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Solo Dysan garantisce che 
tutta la superficie della 
diskette sia realmente 
100% “error free”: un test 
esclusivo certifica le tracce 
e lo spazio tra le tracce 
assicurando prestazioni 
“error free” anche in 
presenza di 
disallineamento delle 
testine. 


Solo Dysan garantisce una 
superficie “a specchio” 
grazie alla sua avanzata ed 
unica tecnica di 
“burnishing” - questo 
risultato assicura un 
miglior segnale sulle 
tracce, una minor 
turbolenza sulle testine, 
consentendo un sicuro 
mantenimento dei dati 
dopo milioni e milioni di 
rotazioni. 


Solo Dysan garantisce, 
mediante uno speciale 
procedimento di 
lubrificazione, ottenuto 
trattando la superficie con 
il proprio esclusivo 
lubrificante DY 10, che le 
prestazioni “error free” 
siano esaltate e mantenute 
nel tempo. 


Solo Dysan garantisce, con 
il suo metodo automatico 
di controllo qualità di tutta 
la produzione (risultato di 
una tecnologia leader nel 
mondo) che ogni diskette 
prodotta sia stata 
singolarmente testata e 
certificata. 
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Nel mio Apple c’è un’edicola 

Una banca dati per avere sotto controllo un articolo, il suo numero di 
pagina, la rivista su cui è stato pubblicato. 

Nulla è disperso 

Un file cancellato accidentalmente, un disco che dà l’odiato I/O error, un 
programma che viene letto a metà. .. Ma è proprio tutto perduto? 

Con qualche $ in più 

Volete personalizzare l’Hello dei vostri dischetti? Oppure volete evitare 
che sguardi estranei possano leggere i listati dei vostri programmi? 
Ecco qualche trucco che. .. 

A ciascuno il suo messaggio 

Lui non c’è. Lei non c’è. Ma l’Apple è lì, pronto, 24 ore su 24. Perché 
allora non sfruttarlo per lasciare un messaggio, personalizzato, per la 
persona assente? Facilissimo, con questo programma che. .. 

Chi vuol esser mela sia... 

.. .e chi ancora non lo è legga l’esperienza di questi 9 testimoni. E si 
affretti: con un Apple del doman c’è più certezza... 


Apple edicola, pag. 8 


Quante cose col Mac 

Inizia da questo numero una rubrica fissa che informerà i lettori di 
quanto c’è di nuovo per Macintosh. 


54 


Nembo Keyd 

Non è il famoso eroe degli anni Cinquanta, rivisitato in chiave moderna, 
bensì un tastierino numerico pronto a entrare in azione ogni volta che... 


69 

76 


E’ uguale o non è uguale? 

Nella versione 1.7 del tal programma avete introdotto una variante alle 
righe 2090 e 3020.0 erano le righe 2020 e 3090? Per saperlo subito e 
senza errori, basta... 

Trappola per pochi 

Tre animali feroci vi inseguono. .. riuscirete a metterli in trappola? 



Per chi l’Apple non ce l’ha, pag. 37 
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Chi stacca gli stack 

Ultil 


Ecco la settima e ultima puntata del corso di Pascal: stack e heap, e i 
meccanismi di allocazione della memoria non hanno più segreti. 


101 


Speciale Appiiscuola 

In molti ormai scrivono al professor Tonti per collaborare a questa 
rubrica che ha incontrato grandissimo favore. Ma come si scrive un 
programma didattico? Ecco un articolo che ve lo spiega. 

Certo che farebbe comodo un programma che risolva le espressioni in 
modo che però si impari come vanno risolte. Be’, eccolo qui, 
richiedibile anche su dischetto. 



Macnews, pag. 51 

Super tastierino numerico, pag. 54 


Le rubriche 

6Applicosa 
111 Lettere 

113 Mercatino delle mele 

114 Disk Service 
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"Aggiungi un posto a tavola." Quante volte è 
capitato di pronunciare o di sentire questa frase? 
Vuol dire che è arrivato un amico ed è quindi 
un'occasione di piacere e di gioia. Ebbene, questo 
mese un posto a tavola l'abbiamo aggiunto noi in 
Applicando. Un posto per chi l'Apple ancora non ce 
l'ha. Non si preoccupino coloro che temono di veder 
sottrarre spazio a programmi, notizie e golosità in 
genere: le pagine del giornale sono aumentate a 
116. Ce n'è per tutti. E comunque le pagine dedicate 
ai nuovi possibili amici sono interessanti anche per 
chi l'Apple ce l'ha già. Si tratta infatti di una serie 
di interviste a chi usa Apple: un'occasione per farsi 
venire nuove idee, per scoprire, magari, 
un'applicazione che altrimenti non sarebbe mai 
venuta in mente. Un "Applichi" formato gigante, in 
sintesi, e così l'abbiamo chiamato (pag. 37). 

Ma questo concetto di aggiungere un posto a 
tavola va un poco oltre. Spero che sia vissuto come 
l'inizio di una nuova socialità fra gli applisti. E in 
questo senso vorrei lanciare un appello a tutti i 
lettori: che Applicando sia anche un club. Raffinato 
come un club inglese, cordiale come un club 
americano e fantasioso come solo un club italiano 
potrebbe essere. In Applicando cercheremo di 
ricavare uno spazio dedicato a questo club: il 
salotto dove i soci possano riunirsi e. scambiarsi 
impressioni e idee, dove possano prospettarsi a 
vicenda problemi e avanzare soluzioni. Le porte 
sono aperte: sta a voi adesso scriverci. Se 
l'iniziativa è di vostro gradimento ne saremo felici 
e faremo di tutto per farla crescere. 

Per una volta perdonatemi se non commento con 
voi il resto della rivista, ma rimane solo lo spazio 
per augurarvi, anche da parte di tutta la redazione, 
un felice 1985 pieno di mele e di tutto quant'altro 
desiderate... 














Mac portatile 


Non che il Macintosh deb¬ 
ba considerarsi un computer 
da piazzare su un tavolo e da 
lasciare lì. Tra gli accessori 
esiste infatti una borsa ele¬ 
gante che permette di por¬ 
tarselo appresso senza trop¬ 
pe difficoltà per poterlo usa¬ 
re ovunque se ne abbia l’esi¬ 
genza. Ma per coloro che 
vogliono trasformarlo in un 
portatile robusto, resistente 
anche alle peggiori condi¬ 
zioni atmosferiche, utilizza¬ 
bile in ambienti non condi¬ 
zionati, come le officine, 
con le misure standard per 
essere considerato dalle 
compagnie aeree come ba¬ 


gaglio a mano e quindi da 
poter piazzare sotto il sedile 
dell’aereo, la Colby Compu¬ 
ter ha messo a punto un kit 
di trasformazione. 

Una volta chiuso il coper¬ 
chio (che contiene la tastie¬ 
ra) MacColby è anche pres¬ 
surizzato. Il mouse trova po¬ 
sto in un comodo alloggia¬ 
mento laterale, e l’unico ca¬ 
vo esterno è quello di ali¬ 
mentazione. Il costo del kit 
è di 599 dollari. A richiesta 
si può avere un secondo disk 
drive (399 dollari) e un hard 
disk da dieci mega (2.100 
dollari circa), sempre inter¬ 
ni alla carrozzeria. Per ulte¬ 
riori informazioni: Colby 
Computer, 849 Indepen- 
dence Avenue, Mountain 
View, CA 94043. 


Un baule 
per il //c 

Per i funzionari di banca 
che vengono trasferiti ogni 
pochi mesi, o per i capitani 
di lungo corso o, infine, per 
coloro che trascorrono la 
propria vita in residenze di¬ 
verse a tempi alterni, ecco 
un magnifico bauletto nel 
quale traslocare non la bian¬ 
cheria, ma il proprio Apple 
//c. Antiurto, impermeabile 
e quasi a prova di bomba, 
questo tipo particolare di 
contenitore è molto diffuso 
in America, dove però tro¬ 
var casa non è un problema 
e dove la gente si trasferisce 
da una città all’altra con una 
naturalezza sconosciuta agli 




italiani. Anvil Cases, Ine., 
4128 Tempie City Blvd., 
Rosemead, CA 91770. Prez¬ 
zo al pubblico: 275 dollari. 

Dischetti offresi 

E’ comparsa recentemen¬ 
te una nuova marca di di¬ 
schetti nei computershop 
italiani. Immessi nel merca¬ 
to dalla Step di Piacenza, già 
produttrice di moduli conti¬ 
nui, nastri di stampa e sup¬ 
porti magnetici, vanno ad 
aggiungersi agli ormai nu¬ 
merosi concorrenti. Meglio 
così: per la famosa legge del¬ 
la domanda e dell’offerta 
speriamo che i prezzi di que¬ 
sti indispensabili strumenti 
continuino a diminuire, per 
la gioia di chi li usa quotidia¬ 
namente. 








In 100.000 
al COMDEX 

Oltre 100.000 visitatori 
hanno affollato a Las Vegas, 
nei cinque giorni tra il 14 e il 
18 novembre, il sesto COM¬ 
DEX. La manifestazione, 
che ha avuto il suo battesi¬ 
mo nel 1979, annoverava 
quest’anno 1.400 espositori. 
Sembrano remoti i tempi in 
cui il COMDEX apriva i 
battenti per la prima volta 
ad appena 4.000 persone, 
nello scenario alquanto as¬ 
surdo di questa città dedita 
al gioco d’azzardo, in cui ci 
sono slot machine perfino 
nelle toilette e nelle sale 
d’attesa dell’aeroporto. Nel 
girare per gli stands si aveva 
l’impressione di fare un sal¬ 
to nel futuro: il gap tecnolo¬ 
gico con l’Europa era qui di 
nuovo evidente. Le banche 
dati e la posta elettronica so¬ 
no in America una realtà 
diffusissima, e un’intera se¬ 
zione era dedicata ai modem 
e ai mezzi di dialogo auto¬ 
matico via personal compu¬ 
ter. Per mandare una lettera 


a 4.000 miglia di distanza, 
basta digitarla nel proprio 
Apple e trasmetterla all’ap¬ 
posito servizio di una banca 
dati. La Posta americana, 
che ha terminali in tutto il 
territorio nazionale, prende 
la lettera dalla banca dati e 
la trasmette dal suo termina¬ 
le più vicino al luogo di de¬ 
stinazione. Di qui viene re¬ 
capitata con sistemi tradi¬ 
zionali e arriva a destinazio¬ 


ne nel giro di 6-12 ore. Nello 
stand Apple troneggiava un 
Macintosh gigante, sul qua¬ 
le si alternavano ogni 30 mi¬ 
nuti dimostazioni di softwa¬ 
re differenti, dei quali Ap¬ 
plicando vi informa con la 
rubrica che ha inizio in que¬ 
sto numero dal titolo Mac- 
news. Naturalmente novità 
software anche per il più tra¬ 
dizionale Apple //e o il por¬ 
tatile //c. 


Col computer 
non ha a che fare 

Ma ha a che fare col civi¬ 
smo e la buona volontà. E 
poiché chi usa un computer 
è sicuramente civico e di 
buona volontà ne ha tanta 
(basti pensare a quanta pa¬ 
zienza ci vuole a volte nell’u- 
sare il computer) , desideria¬ 
mo informare tutti gli appli- 
sti e non che la Lega italiana 
per la lotta contro i tumori 
organizza a Milano, daini 
al 17 dicembre, una fiera ga¬ 
stronomica in Piazza S. Ste¬ 
fano, il cui ricavato sarà de¬ 
voluto al sostegno finanzia¬ 
rio dei malati di cancro. Per 
chi non vive a Milano c’è 
ugualmente modo di contri¬ 
buire al finanziamento della 
Lega: il contributo parte da 
2.000 lire per i soci ordinari 
e dalle 50.000 lire in su per i 
soci benemeriti. I contributi 
possono essere inviati a 
mezzo conto corrente posa¬ 
le n. 32381204, intestato a 
Lega italiana per la lotta 
contro i tumori. Via Vene- 
zian 1, 20133 Milano. 
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Una banca dati per avere sotto controllo 
un articolo, il suo numero di pagina, 
la rivista su cui è stato pubblicato 
l’argomento di cui tratta. Questo programma permette di 
raccogliere fino a 500 record 
che possono essere caricati, ordinati, 
cercati, cambiati o cancellati. 


Nel mio Apple 
c’è un’edicola 


C apita di dover cercare un certo ar¬ 
ticolo pubblicato da una rivista, 
ma di non ricordare in quale numero. 
Oppure si sa il numero della rivista, 
ma non quello della pagina. 

L’Apple edicola può tener nota de¬ 
gli articoli, che possono essere ordina¬ 
ti, cercati, cambiati o cancellati. Inol¬ 
tre si possono creare file differenti per 
differenti riviste. 

Il programma 

Dopo aver digitato e salvato il pro¬ 
gramma si batta RUN. Dopo una 
schermata di presentazione, si prema 
un tasto qualsiasi per avere il menù 
principale: 

1 - Inizializza un file 
2 - Carica un’altra rivista 
3 - Aggiungi articoli 
4 - Cambia articoli 
5 - Cancella articoli 
6 - Elenca articoli 
7 - Ordina articoli 
8 - Fine 

Dato che si tratta della prima esecu¬ 
zione si introduca l’opzione 1. Compa¬ 
rirà una lista di intestazioni possibili. 
Se ne possono introdurre fino a sei, in 
un ordine qualunque rispetto alla lista. 
Premendo il tasto RETURN senza in¬ 
trodurre nulla si tornerà al menù prin¬ 
cipale. Dopo aver introdotto le oppor¬ 
tune intestazioni e battuto RETURN, 
queste saranno listate. Se sono inesat¬ 
te si batta ’N’ e le si potrà introdurre di 
nuovo. 

Inizializzazione dei file 

Adesso si deve introdurre il numero 
dei caratteri da accordare a ogni inte- 


10 

REM 


11 

REM 

» APPLE EDICOLA 

» 

12 

REM 

» BY GLEW ARCHER 

« 

13 

REM 

* COPYRIGHT (C) 1984 « 

14 

REM 

» BY APPLIC^DO & 

» 

15 

REM 

* MICRO-SPARC, INC 

« 

16 

REM 


20 

ONERR 

GOTO 8000 


25 

FOR I 

= 1 TO 6: READ HE$(I): 

NEXT 


30 DATA TITOLO DELL'ARTI COLO ,^0 DI PUBBLI DAZIONE,NUMERO DELLA RIVIST 
A,NUMERO DELLA PA6ir*^,AR6(]MENTI ,0SSEIWAZI0NI 
40 TEXT ; mmi : SPEED= 255;D$ = CHR$ (4);6$ = CHR$ (7) 

43 IF PEEK (768) = 29 THB^ 100 
45 HOME :X$ = - ■: INVERSE ;M = - 1 

50 FOR CC = 19 TO 1 STEP - 1;M = M + 2; VTAB 1; HTAB CC; PRINT X$: VTAB 1; 
HTAB CC ♦ M; PRINT X$ 

55 VTAB 23: HTAB CC: PRINT X$: VTAB 23: HTAB CC + M: PRINT X$: NEXT 

56 M = 24: FOR CC = 1 TO 12:M = M - 2: VTAB CC: HTAB 1: PRINT X$: VTAB CC: HTAB 

39: PRINT X$: VTAB CC ♦ M: HTAB 1: PRINT X$: VTAB CC 4 M: HTAB 39: PRINT 
X$: NEXT : NORWIL 

57 VTAB 5: HTAB 8: IWERSE : PRINT 'APPLE EDICOLA': NORf^L 
70 VTAB 9: HTAB 13: PRINT 'DI 6LEW ARCHER' 

80 VTAB 11: HTAB 12: PRINT 'COPYRIGHT 1984 BY ': HTAB 6: PRINT 'APPLIC^DO 
& MICRO-SPARC, INC. ' 

90 (/TAB 18: HTAB 7: PRINT 'PREMI UN TASTO PER CONTINUARE';: 6ET Ai 
100 HOME : HTAB 7: IfflERSE : PRINT 'APPLE E D I C 0 L A ': VTAB 4: HTAB 
16: FLASH : PRINT 'MENU': NORl^L 

110 VTAB 6: PRINT TAB( 7)'l. INIZIALIZZA UN FILE': PRINT : PRINT TAB( 7)' 

2. CARICA UN'ALTRA RIVISTA': PRINT : PRINT TAB( 7)'3. AGGIUNGI ARTICOL 

I' 

120 PRINT : PRINT TAB( 7)'4. (YVIBIA ARTICOLI': PRINT : PRINT TAB( 7)'5. C 
^CELW ARTICOLI': PRINT : PRINT TAB( 7)'6. ELENCA ARTICOLI' 

130 PRINT : PRINT TAB( 7)'7. CERCA/ORDim ARTICOLI': PRINT : PRINT TAB< 7 
)'8. FINE' 

140 VTAB 23: HTAB 7: PRINT 'QUALE OPZIONE ?'; 

150 GET A$:A = VAL (A$): IF A < 1 OR A > 8 THB^ 150 
155 ON A GOSUB 1000,2000,3000,4000,5000,6000,7000,59999 
160 GOTO 100 

200 FL = 0: IF fW = " THEN FL = 1 
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stazione. Si dovrebbero prevedere 
quattro caratteri per l’anno di pubbli¬ 
cazione, tre per il numero della rivista 
e tre per il numero di pagina. Si badi di 
prevedere un numero di caratteri suf¬ 
ficienti per gli altri campi. D’altro can¬ 
to non li si faccia troppo lunghi, in 
quanto così si occupa più spazio sul 
dischetto. Verrà chiesto se la numera¬ 
zione è esatta. In caso affermativo si 
introduca il nome della rivista e si pre¬ 
ma RETURN. Il programma creerà 
allora il file di database sul disco. 

Caricamento 

Questa opzione è disponibile nel ca¬ 
so si voglia modificare i dati contenuti 
nel file di una rivista già memorizzata. 
Si introduca il nome della rivista che si 
desidera o si batta un asterisco (*) per 
avere l’elenco delle riviste già inserite. 

Inserimento 

Permette di introdurre i dati sotto 
l’intestazione scelta in precedenza. A 
causa dello spazio limitato esistente 
sul dischetto non si possono introdurre 
dati relativi a oltre 500 articoli. Dopo 
aver letto le istruzioni d’impiego si 
prema un tasto qualunque. Sullo 
schermo apparirà la prima intestazio¬ 
ne, seguita da segni di sottolineatura i 
quali rappresentano il numero dei ca¬ 
ratteri che si possono introdurre. 

Quando si introducono i numeri ri¬ 
guardanti il numero della rivista e la 
pagina, si battano zeri non significativi 
in modo che l’opzione di ordinamento 
funzioni a dovere. Per esempio, i dati 
per l’anno 1983, numero 8, pagina 45 
sarebbero introdotti correttamente 
come 1983, 008, 045. Se si cercherà di 
digitare più di quanto si è specificato 
suonerà il campanello e il carattere 
non verrà stampato. Premendo RE¬ 
TURN alla prima intestazione, o pre¬ 
mendo il tasto CTRL mentre si preme 
R, in qualsiasi momento si tornerà al 
menù principale. 

Dopo che sono state introdotte tutte 
le informazioni verrà chiesto se sono 
esatte. In caso negativo il programma 
cancellerà tutti i dati e si potrà rico¬ 
minciare da capo. Altrimenti verrà 
salvato il record. 

Cambia 

Permette di cambiare un record esi¬ 
stente sul dischetto. Si può cambiare 
uno specifico record o aggiornarli tut¬ 
ti. Premendo un tasto qualsiasi si avrà 
il primo record. Se lo si vuol cambiare 
si batta ’S’ e all’inizio del primo record 
apparirà il cursore. Premendo RE¬ 
TURN si manterranno le informazioni 


210 IF miì) = •- THEN FL = I 

220 IF NU = 0 THEN FL = 1 

230 IF FL = 1 THEN HOME : GOSUB 2010 

240 IF LEN (m) = 0 THEN POP ; RETURN 

250 RETURN 

1000 HCME = TNIZIALI22A I FILE'; GOSUB 60000; PRINT ; PRINT ; PRINT "I 
NTRODUCI I DATI: • 

1020 NU = 1; ÙTAB 7; FOR I = 1 TO 6: PRINT TAB< 7)1". "HE^d): PRINT : NE)a 

1040 VTAB 21: PRINT "QUALE VOCE SCEGLI PER IL N."NU" ?";; GET A$: IF A$ = 

CHR$ (13) NU = 1 THEN RETURN 

1046 IF A$ = CHR$ (13) THEN NU = NU - 1: GOTO 1060 

1047 A = VAL (A$): IF A < 1 OR A > 6 THEN PRINT : GOTO 1040 

1050 'VTAB 5 + (2 * A): HTAB 7; IWERSE : PRINT A; NORT^L ;0A$(NU) = HE$(A); 

IF NU > 5 THEN 1060 
1057 NU = NU + 1; GOTO 1040 

1060 HOME ; PRINT "LE VOCI, NELL'ORDINE, SONO VTAB 5: FOR I = 1 TO NU; PRINT 
DA$(I): PRINT ; NE)(T 

1080 VTAB 21; PRINT "E' CORRETTO (S/N) ?";; GET A$! IF A$ = CHR$ (13) THEN 
RETURN 

1090 IF Al < > "S" THEN 1000 

1100 HOME ; PRINT "INTRODUCI LA LUNGHEZZA DI CIASCUN C^PO:": FOR I = 1 TO 
NU 

1130 VTAB 3 + (I « 2); PRINT 1". "OAI(I);: HTAB 26: INPUT "";LI(I); IF LEN 
(LKD) = 0 THEN 1130 

1135 L(I) = VAL (LKD); IF L(I) = 0 OR L(I) > 65 THEN 1130 
1140 L = L ♦ L(I); PRINT : HBa 

1150 VTAB 21; PRINT "E' CORRETTO (S/N) ?";; GET Al; IF Al = CHRI (13) THEN 
RETURN 

1165 IF Al < > "S" THEN 1100 

1180 HOME ; VTAB 5; INPUT "QUALE E' IL NOME DELLA RIVISTA ?';rW; IF LEN ( 
ft«) = 0 THEN RETURN 
1200 RD = 0 

1210 PRINT DI"0PEN HEADER."ft« 

1220 PRINT DI'DELETE HEADER.'ft^ 

1230 PRINT DI"OPEN HEADER."1W 
1235 PRINT DI"URITE HEADER."rW 
1240 PRINT L; PRINT NU 

1245 FOR I = 1 TO NU; PRINT DAKI); PRINT L(I); NE)(T 
1250 PRINT DI'CLOSE HEA0ER."ft« 

1255 PRINT DI"L0CK HEADER."ft« 

1260 PRINT DI"0PEN DATA."rW",L"L 
1270 PRINT DI"URITE DATA."ft^l",R0" 

1280 PRINT RD 

1290 PRINT DI"CL0SE"; RETURN 

2000 HOME ;AI = "CARICA UT^ RIVI STA:60SUB60000; VTAB 5 

2010 PRINT : PRINT "INTRODUCI IL NOME DELLA RIVISTA 0 ";; IWERSE ; PRINT " 

«•; NORl^L ; INPUT "PER IL CATALOGO; ";AI; IF Al = "»" THEN PRINT DI"C 
ATALOG"; GOTO 2010 
2020 IF LEN (Al) = 0 THEN RETURN 
2025 rw = Al 

2030 PRINT DI"0PEN HEADER."fW 
2040 PRINT UI'READ HEADER."MNI 
2050 INPUT L; INPUT NU 

2060 FOR I = 1 TO NU; INPUT DAKI); INPUT L(I); NEXT 
2070 PRINT DI"CL0SE HEADER."rW 
2080 PRINT DI"0PEN DATA."NNI",L"L 
2090 PRINT DI"READ DATA.•rW",R0" 

2100 INPUT RD 
2110 PRINT DI'CLOSE" 

2120 RETURN 

3000 GOSUB 200; HOME ;AI = "AGGIUNGI UN RECORD"; GOSUB 60000 

Continua 
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e si sposterà il cursore airintestazione 
seguente. Per cambiare i dati basterà 
inserire quelli esatti e battere RE¬ 
TURN. Verrà chiesto ancora se sono 
esatti; in caso affermativo saranno sal¬ 
vati su dischetto. 

Cancella 

Verrà chiesto quale record cancella¬ 
re. Dopo che si è introdotto il nome 
sarà chiesto di verificarlo battendo 
/SI”. Se si ha la verifica, il record da 
cancellare sarà sostituito dall’ultimo 
record del file. 

Elenca 

Con questa opzione si possono lista¬ 
re o specifici record o tutti i record e 
stamparli sullo schermo o sulla stam¬ 
pante. Dopo che ciascun record è stato 
stampato verrà chiesto se continuare o 
smettere. Premendo RETURN si tor¬ 
nerà al menù principale. 

Ricerca 

Questa opzione troverà una stringa 
che sia introdotta sotto una specifica 
intestazione, e stamperà qualsiasi re¬ 
cord in cui essa venga trovata. Si intro¬ 
duca dapprima la voce da cercare, e 
poi l’intestazione sotto cui guardare. I 
record possono anche essere stampati 
su una stampante. Il programma leg¬ 
gerà poi un record, cercando la voce 
che è stata introdotta. 

Ordinamento 

Questa opzione ordinerà tutti i re¬ 
cord su disco a qualsiasi intestazione. 
Si introduca l’intestazione alla quale 
fare l’ordinamento e si attenda fino a 
che compare “ORDINAMENTO 
COMPLETATO”. Si può guardare a 
questo punto la lista ordinata. Dopo 
che si sono guardati tutti i record, o se 
si è premuto RETURN per uscire, 
verrà chiesto se si vuol salvare il file 
nella disposizione ordinata. In caso af¬ 
fermativo si batta ’S’. 

Come funziona 
il programma 

Il sistema di memorizzazione utiliz¬ 
zato è un file ad accesso casuale, in cui 
ogni articolo e il suo contenuto vanno 
in un unico record. Ciò rende facile 
accedere al file e cambiarlo, ordinarlo 
o esaminarlo. L’unico problema è che 
non si può cancellare un record. Per 
ovviare all’inconveniente basta carica¬ 
re l’ultimo record e salvarlo con SA¬ 
VE sopra quello indesiderato. Poi si 
sottrae semplicemente uno dal nume¬ 
ro dei record. 


3010 ^‘TAB 5; PRIMI "PER CIASCUN RECORD, MRODUCI I DATI"; PRIMI "SEGUITI D 
A UN RETURN. SE FAI UN ERRORE,": PRIMI "PREMI IL TASTO <- PER CFWCELLA 
RE LA"; PRIMI "LETTERA PRECEDENTE. PER FINIRE BATTI" 

3020 IWERSE ; PRIMI "RETURN";; NORmL ; PRIMI " PRIMI "QU^V^DO VIENE RI 
CHIESTO IL ";DA$(1)"." 

3025 PRiriT ; PRIIT "SE VUOI INTERROMPERE IL RECORD, BATTI"; PRIMI "CTRL - R 
PER TORTORE AL MENU." 

3030 VTAB 18;A$ = "PREMI UN TASTO PER COMINCIARE": 60SUB éOOOO 
3040 X = PEEK ( - 1Ó3S4): IF X < 128 THB^ 3040 

3055 RD = RD 4 1; IF RD > 500 THEN HOME : VTAB 11; PRIMI "NON PUOI INTRODUR 

RE ALTRI RECORD. SE": PRIMI "VUOI CONTINUARE, CREA UN ALTRO FILE."; FOR 
I = 1 IO 3000: NEXT ; RETURT^ 

3060 POKE - 16368,0; HOME ; PRIMI "RECOR N.";RD: VTAB 3 
3070 FOR I = 1 IO NU;M = LEN (DA$(I)); IF M > K THEN K = M 4 1 
3080 NEXT 

3085 FOR X = 1 IO NU: PRIMI DAÌ(X);: HTAB K; PRIMI FOR I = 1 IO L(X): 
PRIMI CHR$ (95);; NEXT 

3087 IF L(X) 4 K 4 1 > 40 THEN VTAB PEEK (37) 

3090 HTAB K 4 1 ;BE = 0;BD = 1 ; GOSUB 3200; PRIMI ; PRINT 

3105 !F ( LEN (BB$) = 0 /¥^D X = 1) OR Bl = CHR$ (18) THEN RD = RD - 1; RETURN 

3110 DI$(X) = BB$;BB$ = ""; NEXT 

3120 VTAB 19; HTAB 1; PRINT "E^ CORRETTO iSm ?";; GEI A$: PRINT : IF A$ = 
CHR$ (13) THEN RD = RD - 1 : RETURN 
3125 IF A$ ( ) "S" THEN 3060 
3151 PRIMI D$"0PEN DATA."MN$",L"L 
3160 PRINT DI'URITE DAIA."rtl$",R"RD 
3170 FOR I = 1 IO NU; PRIMI CHR$ (34);DIf(I); NEXT 
3180 PRIMI D$"CL0SE" 

3195 GOSUB 1260; GOTO 3055 
3200 REM «« ROUTINE DI INPlfl « 

3210 GEI B$; IF B$ = CHR$ (13) OR B$ = CHR$ (18) THEN RETURN 
3220 IF B$ = CHR$ (8) THEN 3260 

3230 IF B$ ( CHR$ (32) THEN 3210 

3232 IF B$ = CHR$ (34) THEN 3210 

3233 IF BE = 1 THEN PRINT CHR$ (7);; GOTO 3210 

3234 BD = 0 

3235 IF LEN (BBI) = L(X) THEN PRINT CHR$ (7);;BE = 1; GOTO 3210 

3240 BB$ = BB$ 4 B$; PRINT B$;;B$ = "": GOTO 3210 

3260 IF BD = 1 THEN PRINT CHR$ (7);; HTAB K 4 1; GOTO 3210 

3265 IF LEN (BB$) < 2 THEN BB$ = •":BD = 1; GOTO 3280 
3270 BB$ = LERf (BB$, LEN (BB$) - 1) 

3280 BE = 0; PRINT CHR$ (8); CHR$ .(95); CHR$ (8);; GOTO 3210 

4000 GOSUB 200; HOME :A$ = "C^BIA UN ARTICOLO"; GOSUB 60000; VIAB 5 

4006 IF RD = 0 THEN PRINT "NESSUN RECORD."; FOR I = 1 TO 2000: NEXT ; RETURN 

4010 INPUI "RECORD DA CAMBIARE N.(-99 PER TLUTl) '?";M1$; IF LEN (MH) = 0 OR 
VAL (Ml$) = 0 THEN RETURN 
4025 MI = VAL (MH); IF MI ) RD THEN 4000 
4030 IF MI < 0 THEN M2 = 1;M3 = RD: GOTO 4050 
4040 M2 = MI;M3 = M2 
4045 VTAB 9 

4050 'VTAB 9: PRIffl ; PRINT "PER OGTh RECORD, SE VUOI C^BIARLO,"; PRIMI "VE 
RRA' VISUALIZZATO IL CURSORE"; PRINT "ALLMNIZIO DEI DATI." 

4060 PRINT "PREMI RETURN, PER LA RIGA SUCCESSIVA."; PRIfTf "CTRL-R. PER IL R 
ECORD SUCCESSIVO." 

4090 'VTAB 21;A$ = "PREMI UN TASTO PER COMINCIARE": GOSUB 60000 
4100 X = PEEK ( - 16384): IF X ( 128 THEN 4100 
4110 HOME ; POKE - 16368,0 
4120 FOR E = M2 TO M3 

4130 PRINT "RECORD «"E; VTAB 5; GOSUB 6500: GOSUB 6300 
4170 VTAB 3 4 (X * 2) 4 2; PRINT "VUOI CAMBIARE QUESTO RECORD ?";: GET A$; IF 
A$ = CHR$ (13) THEN RETURN 
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A partire dalla linea 3200 c’è una 
routine di input che è utilizzata dalle 
opzioni di aggiunta e di cambiamento. 
Questa subroutine permette di intro¬ 
durre in una stringa soltanto i tasti al¬ 
fanumerici e le virgole. Tutti i tasti di 
controllo e i controlli del cursore sono 
filtrati ed esclusi. La sola eccezione è 
costituita dalla freccia destra per 
editare. 

Di mano in mano che ciascun carat¬ 
tere viene introdotto è aggiunto a una 
stringa fittizia denominata BB$. Dopo 
che è stato premuto un tasto la routine 
controlla se l’utente abbia digitato ol¬ 
tre la lunghezza di immissione, per 
esempio cercando di tornare indietro 
prima del carattere iniziale o cercando 
di digitare più della lunghezza specifi¬ 
cata. 

Un’altra caratteristica dell’Apple 
edicola è la sua routine di ordinamen¬ 
to. Dopo che l’utente ha specificato 
l’intestazione alla quale eseguire l’or¬ 
dinamento essa legge ogni intestazio¬ 
ne in ogni record. Purtroppo non si 
può leggere in un record un campo 
separato, quindi è stato predisposto a 
linea 7580 un’istruzione ciclica POR 


Impiego delle linee 
del programma 

Linee 0-43 Inizializza le variabili 
Linee 45-90 Pagina di copertina 
Linee 100-160 Menù principale 
Linee 200-250 Controlla se il data¬ 
base è in memoria 
Linee 1000-1290 Inizializza un file 
Linee 2000-2120 Carica un altro 
database 

Linee 3000-3195 Routine di ag¬ 
giunta record 

Linee 3200-3280 Routine di input 
Linee 4000-4340 Routine di cam¬ 
biamento record 

Linee 5000-5130 Routine di cancel¬ 
lazione record 

Linee 6000-6088 Routine per lista¬ 
re un record 

Linee 6300-6330 Subroutine 
stampa 

Linee 6400-6460 Subroutine per 
listare 

Linee 6500-6540 Subroutine recu¬ 
pero file 

Linee 7060-7210 Routine di ritro¬ 
vamento 

Linee 7500-7740 Routine di ordi¬ 
namento 

Linee 8000-8200 Routine di gestio¬ 
ne errore 

Linee 6000 Subroutine centratura 
testo 


4190 IF A$ < ) ’S" THEN HOME ; NEXT ; RETURN 
4205 PRINT 

4210 FOR X = I TO NU; 9TAB 3 4 (2 » X); HTAB K + 1:BE = 0;BD = 0: 60SUB 320 
0 

4220 IF B$ = CHR$ (13) LEN (BB$) = 0 THEN NEXT : GOTO 4250 

4230 IF B$ = CHR$ (18) THEN X = NU; NEXT ; HOME ; NEXT ; RETURN 

4240 DI$(X) = BB$:BB$ = ••: NEXT 

4250 VTAB 3 + (2 * X) + 2; HTAB 1 ; CALI - 958; PRINT CORRETTO (S/N)?"; 

; GET A$; IF A$ = CHR$ (13) THEN RETURN 
4270 IF A$ < > ’S" THEN HOME ; GOTO 4130 
4290 PRINT 

4300 PRINT O^'OPEN DATA.'rWT'L 

4310 PRINT D$“URITE DATA.■■rt«',R'E 

4320 FOR T = 1 TO NU; PRINT CHR$ (34);0U(T); NEXT 

4330 PRINT D$-CL0SE' 

4340 HOME ; NEXT ; RETURN 

5000 GOSUB 200; HOME ;A$ = •C^ICELLA UN ARTICOLO’; GOSUB 60000; VTAB 5 

5015 IF RD = 0 THEN PRINT 'NESSUN RECORD DA C^ICELLARE .’; FOR I = 1 TO 200 

0; NEXT : RETURN 

5020 PRINT ’QUALE RECORD VUOI FLASH ; PRINT ’C^ICELARE’ ; ; mmi ; INPUT 
• ’jMSI; IF LEN (M3$) = 0 THEN RETURN 
5040 M3 = MAL (M3$); IF M3 < 1 OR M3 > RD THEN 5000 

5050 PRINT ; PRINT 'SEI SICURO (SI./N)';; INPUT A$; IF A$ < > ’SI’ THEN RETURN 

5060 IF M3 < > RD THEN 5080 

5070 RD = RD - 1; GOTO 1260 

5080 E = RD; GOSUB 6500 

5090 PRINT DI'OPEN DATA.'rtl$',L’L 

5100 PRINT D^’WRITE DATA.'lt^’,R’M3 

5110 FOR I = 1 TO NU; PRINT CHR$ (34);DI$(I); NEXT 

5120 PRINT D^’CLOSE' 

5130 GOTO 5070 

6000 GOSUB 200; HOME ;A$ = 'ELENCA ARTICOLI’; GOSUB 60000; GOSUB 6400 
6010 1FPR=1THEN PRINT D$'PR#r 

6020 FOR E = MI TO M2; HOME ; PRINT 'RECORD N. ';E; GOSUB 6500; GOSUB 6300 

6030 PRINT 

6045 PRINT D$’PR#0' 

6050 VTAB 3 4 (2 < X) 4 2; IWERSE ; PRINT 'RETURN PER IL MENU'; PRINT ; PRINT 
'UN ALTRO TASTO PER CONTINUARE’;; NORMAL ; GET A$; IF A$ = CHR$ (13) THEN 
PR = 0; RETURN 

6083 IF PR = 1 THEN PRINT ; PRINT D^’PRUl' 

6085 NEXT 

6087 PRINT ; PRINT D$'PR#0' 

6088 HOME ; 9TAB 11;A$ = ’E' TUHO’; GOSUB 60000; FOR I = 1 TO 3000; NEXT ; 

PR = 0; RETURN 

6300 FOR X = 1 TO NU;M = LEN (DA$(X)); IF M > K THEN K = M 4 2 
6310 NEXT 

6315 IF PR = 1 THEN 6330 

6320 FOR X = 1 TO NU; '/TAB 3 4 (2 « X); PRINT DA$(X); TAB( K);DU(X); PRINT 
; NEXT ; RETURN 

6330 PRim ; FOR X = 1 TO NU; PRINT DA$(X); TAB( K - LEN (DA$(X)));DI$ 

(X); NEXT ; PRINT ; PRINT ; RETURN 
6400 VTAB 5; PRINT 'CI SONO 'RD' RECORDS.’ 

6405 IF RD = 0 THEN VTAB 5; PRINT 'NESSUN RECORD DA LISTARE.'; FOR I = 1 TO 
3000; NEXT ; POP ; RETURN 

6410 VTAB 7; INPUT 'RECORD INIZIALE ?';M1$; IF LEN (Ml$) = 0 THEN POP ; RETURN 

6420 IF VAL (Nl$) < 1 OR VAL (Ml$) > RD THEN 6410 
6430 MI = VAL (MU); VTAB 9; INPUT 'RECORD Flf^^LE ?';M2$; IF m (M2i) < M 

1 OR VAL (M2$) ) RD THEN 6430 

6440 M2 = VAL (M2$); VTAB 11; PRINT 'VUOI STIPARLO ?’;; GET A$; PRINT A$; IF 
A$ < > ’S’ WD A$ < > 'N' THEN 6440 

6450 IF A$ = ’S' THEN PRINT D$'PRl»r;PR = 1 Continua 
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... NEXT che legge N$(I), H volte 
(dove H è il numero d’intestazione). 
Ciò vuol dire che legge le intestazioni 
fino a quando viene trovata quella 
voluta. 

Ed ecco un’espediente. Si potrebbe 
dimensionare tre stringhe: una per 
l’intestazione, una per l’indice e una 
per i dati da leggere. Questo però oc¬ 


cupa parecchia memoria, e quindi ec¬ 
co un’alternativa. Basta mettere il nu¬ 
mero d’indice alla fine della stringa, il 
che provvede anche a ridurre il tempo 
occupato dall’ordinamento. Questo 
numero d’indice corrisponde al nume¬ 
ro del record dal quale è originaria¬ 
mente venuto. Quando le intestazioni 
vengono ordinate il numero d’indice si 


sposta anch’esso come parte della 
stringa. Quando l’utente decide di 
guardare la lista ordinata il program¬ 
ma usa il comando RIGHT$ per trova¬ 
re l’indice che punta la posizione ORI¬ 
GINARIA del record. Si procede poi 
a leggere il record appropriato in 
un’altra matrice, A$(J,I), che verrà 
poi salvata su dischetto. 


6460 RETURN 

6500 PRINT WOPEN 0ATA.'fW,L'L 
6510 PRINT D$'READ DATA."ftl$',R‘E 
6520 POR I = 1 IO NU; INPUT DU(l): NEXT 
6530 PRINT DI'CLOSE' 

6540 RETURN 

7000 HOME :A$ = 'CERCA/ORO ; GOSUB 60000 

7020 VTAB 5; PRINT 'VUOI CERCARE 0 ORDIWiRE (C OR 0) 

?•;; GET A$; IF A$ = CHR$ (13) THEN RETURN 
7040 IF A$ = "0" THEN 7500 
7050 IF A$ < > 'C THEN 7000 
7060 GOSUB 200; HOME :A$ = "RICERCA'; GOSUB 60000 
7070 VTAB 5; INPUT "QUALE VOCE VUOI CERCARE ?";ST$; IF 
LEN (ST$) = 0 THEN RETURN 

7090 VTAB 7; FOR I = 1 TO NU; PRINT 1". "0A$(I); PRINT 
; NEXT 

7100 VTAB 23; INPUT "QUALE NUMERO 01 RICERCA ?";H$; 

H = VAL (H$); IF H < 1 OR H > NU THEN 7100 
7125 HOME ; GOSUB 6440; IF PR = 1 THEN PRINT D$"PR#1 • 
7130 PRINT : FOR E = 1 TO RD; HOME ; GOSUB 6500;A$ = 

DI$(H) 

7150 FOR I = 1 TO LEN (A$) - LEN (ST^) + 1 
7160 IF MI0$ (A$,I, LEN (ST$)) = ST$ THEN PRINT "RE 
CORD rE; GOSUB 6300; GOTO 7180 
7170 NEXT ; GOTO 7200 

7180 PRINT D$"PR«0"; VTAB 20; Iff^ERSE ; PRINT "RETURN 
PER IL MENU"; PRINT : PRINT "UN ALTRO TASTO PER 
CONTINUARE";; NORfttL ; GET Ai; PRINT ; IF Ai = CHRi 
(13) THEN PR = 0; RETURN 
7190 IF PR = 1 THEN PRINT ; PRINT Di'PRUl" 

7200 NEXT E;PR = 0; PRM DÌ"PR#0" 

7210 HOME ; VTAB 12;AÌ = "E' TUBO!!"; GOSUB 60000; FOR 
I = 1 TO 2000; NEXT ; RETURN 

7500 GOSUB 200; HOME ;AÌ = "RIORDINO"; GOSUB 60000: VTAB 
4; IF RD < 2 THEN PRINT "NON PUOI RIORDIfWRE MEN 
0 DI 2 RECORD."; FOR I = 1 TO 3000; NEXT ; RETURN 
7510 FOR I = 1 TO NU; PRINT I;". ";DAÌ(I): PRINT ; NEXT 
7520 VTAB 23; INPUT "QUALE VOCE PER IL RIORDINO ?";HÌ 
; IF LEN (Hi) = 0 THEN RETURN 
7530 H = VAL (Hi): IF H < 1 OR H > NU THEN 7520 
7535 DIM AÌ(NU,RD),NÌ(RD); POKE 768,29 
7540 HOME ; VTAB 11; HTAB 12: FLASH : PRINT "STO LEGG 
ENDO IL DISCO";6i: NORMAL 
7550 PRINT Di'OPEN DATA.'fW" ,L'L 
7560 FOR I = 1 TO RD 
7570 PRINT Di'READ DATA."fW",R"I 

7580 FOR J = 1 TO H; INPUT Ni(l); NEXT ;BÌ = STRi (I ) 

7581 IF LEN (Bi) = 1 THEN Ni(l) = Ni(l) + "00"; GOTO 7583 

7582 IF LEN (Bi) = 2 THEN Ni(l) = Ni(l) + "0" 

7583 Ni(l) = Ni(l) + Bi ’ 

7590 NEXT 

7600 PRINT Di'CLOSE" 

7605 HOME : VTAB 11; HTAB 17: FLASH : PRir^ "STO RIOR 


DIWWD0";GÌ; NORMAL 

7610 FOR I = 1 TO RD - 1: FOR J = I 4 1 TO RD: IF Ni( 

I) < = NÌ(J) THEN 7630 
7620 Ti = NÌ(I);NÌ(I) = rtÌ(J):NÌ(J) = Ti 
7630 NEXT J,I:Q = 2 

7640 HOME : VTAB 6: HTAB 10: FLASH : PRINT "RIORDINO 
COMPLETO";Gì;Gì;Gì; NORMAL 

7650 VTAB 9: PRINT "VUOI VEDERE LA LISTA ORDIl^^TA ?"; 

; GET Ai: PRINT Ai; IF Ai < ) "S" THEN 7700 
7660 GOSUB 6440; FOR Q = 1 TO RD: HOME ; PRIlff "RECOR 
D N."Q;E = VAL ( RIGHTì (NÌ(Q),3)); GOSUB 6500; FOR 
J = 1 TO NU;AÌ(J,Q) = DIÌ(J): NEXT ; GOSUB 6300: PRINT 
DÌ"PR#0" 

7670 VTAB 3 4 (2 « X) 4 2; IWERSE ; PRINT "RETURN PE 
R IL MENU"; PRINT "UN ALTRO TASTO PER CONTINUARE" 

;; NORfi^L : GET Ai; PRINT ; IF Ai = CHRi (13) THEN 
PR = 0;Q = Q 4 1: GOTO 7700 
7680 IFPR=1THEN PRINT Di"PRUl" 

7690 NEXT 

7700 HOME : VTAB 5: PRINT DÌ;'PR#0"; PRINT "VUOI SALV 
ARE IL FILE RIORDIIWTO ?";; GET Ai; PRINT Ai: IF 
Ai < > "S" THEN RUN 

7705 HOME ; VTAB 11: HTAB 10: FLASH ; PRINT "STO SCRI 
VEf^DO IL FILE";GÌ: NORfi^L 

7710 PRINT Di'OPEN DATA.'MNi" ,L"L; FOR F = Q - 1 TO R 
D; PRINT Di'READ DATA."hN$",R" VAL ( RIGHTÌ (rtÌ(F 
),3)); FOR J = 1 TO NU; INPUT AÌ(J,F): NEXT : NEXT 
7715 PRINT Di'CLOSE": PRINT DÌ"0PEN DATA.'ftli",L"L 
7720 FOR I = 1 TO RD: PRINT DÌ"URITE DATA.'MNi",R"I 
7730 FOR J = 1 TO NU; PRINT CHRi (34);AÌ(J,I) ; NEXT; NEXT 
7740 PRINT Di'CLOSE": RUr^ 

8000 ERR = PEEK (222); IF ERR = 255 THEN RÉSUMÉ 
8005 HOME : PRINT Di'PRUO": NORWiL ; VTAB 5; PRIffT Gì 
8010 IF ERR = 4 THEN PRINT "DISCO PROTETTO IN SCRIH 
URA. METTI UN ALTRO DISCO NEL DRIVE": GOTO 8200 
8020 IF ERR = 5 THEN PRINT "END OF FILE, mi INTRODO 
TTO IW NOME"; PRINT "DEL FILE SBAGLIATO"!': PRINT 
DÌ;'DELETE HEADER."fW:ft« = '"; GOTO 8200 
8030 IF ERR = 6 THEN PRINT "FILE NON TROVATO !! f^I 
INTRODOTTO IL NOME DEL FILE ERRATO"!'; GOTO 8200 
8040 IF ERR = 8 THEN PRINT "I/O ERROR. CONTROLLA LO 
SPORTELLO DEL DRIVE."; GOTO 8200 
8050 IF ERR = 9 THEN PRINT "DISK FULL. SOSTITUISCI I 
L DISCO.'; GOTO 8200 

8060 IF ERR = 10 THEN PRINT 'mi GIA^ UN FILE CON LO 
STESSO NOMEE.'; GOTO 8200 

8070 LI = PEEK (218) 4 PEEK (219) * 256; PRINT "ERRO 
RE N.'ERR" ALLA LINEA N.'LI'.'; PRINT "CONTROLLA 
IL mmiE APPLESOn,A PAG.136.'; END 
8200 PRINT ; PRINT "PREMI UN TASTO PER IL MENU.';: GET 
Ai: GOTO 100 

59999 HOME ; POP : POKE 768,2: END 

60000 PRINT TAB( 20 - LEN (Ai) / 2);AÌ: RETURN 


1984 by Nibble e Applicando 
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Un file cancellato accidentalmente, un disco 
che improvvisamente dà l’odiato I/O error, 
un programma che viene letto a metà sono 
inconvenienti nei quali si può incorrere di frequente. 
Ma è proprio tutto perduto? Certe volte 
caricando il Disk Zap e modificando 
iliD) una traccia o un settore. 



Nulla si distrugge 


L a prima regola da tenere presente 
è quella di fare una copia di sicu¬ 
rezza di ogni dischetto che viene usa¬ 
to. La seconda è quella di avere sem¬ 
pre a disposizione un programma che 
consenta di analizzare un dischetto, e 
la terza quella di avere un programma 
che sia capace di riparare ai danni rile¬ 
vati. 

Seguendo queste precauzioni il ri¬ 
schio di perdere preziosi dati se un 


dischetto fa i capricci diminuisce note¬ 
volmente. Gli strumenti che servono 
sono un programma di Disk Map e 
uno di Disk Zap. Il Disk Map provve¬ 
de a raccogliere le informazioni, a fare 
la mappa dei bit e a scoprire dove e 
come il disco è stato danneggiato. Il 
programma di Disk Zap, analizzato in 
queste pagine, serve invece per risol¬ 
vere molti dei problemi che emergono 
dall’analisi fatta. Nella pratica un Disk 


Zap carica i dati di un settore nella 
Ram per permettere di esaminarli, 
modificarli o di sottoporli a una opera¬ 
zione di Zap cioè di riscrivere dalla 
Ram al dischetto le informazioni del 
settore editato. I programmi di Disk 
Zap rappresentano forse lo strumento 
più comune nel debugging di un di¬ 
schetto e non è difficile trovarli in 
commercio. La versione presentata in 
queste pagine comprende istruzioni a 
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battuta singola, lo scorrimento bidire¬ 
zionale con editing a tutto schermo in 
esadecimale e ASCII e una routine di 
stampa per riservare il settore su una 
stampante nel formato ottanta 
colonne. 

Il programma Disk Zap 

Entrati nel linguaggio macchina con 
CALL-151, battuto con attenzione il 
listato di Disk Zap, e tornati in Apple¬ 
soft con l’istruzione 3D0G si salvi il 
programma sul dischetto digitando 
BSAVE DISK ZAP,A$6000,L$CE4. 

Una raccomandazione: il Disk Zap 
presuppone che il dischetto su cui si 
deve lavorare sia nello slot 6, drive 1, e 
che si stia usando il DOS 3.3. 

Per eseguire il programma si deve 
semplicemente battere BRUN DISK 
ZAP e sul monitor apparirà la videata 
visibile in Figura 1. 

A questo punto il programma chie¬ 
de la traccia e il settore del primo set¬ 
tore che si vuole caricare. Attenzione 
a introdurre questi input in esadecima¬ 
le. Se tutto risulta corretto possiamo 
dare la conferma e procedere al carica¬ 
mento. 

Una volta che un settore è caricato il 
programma visualizza i dati, come in 
Figura 2. I dati del settore specificato 
alla sommità dello schermo sono vi¬ 
sualizzati sia in formato esadecimale 
sia in formato ASCII dello schermo 
dell’Apple. In altre parole il carattere 
visualizzato nella sezione ASCII è 
quello che si vedrebbe sul video a pat¬ 
to che il valore esadecimale sia diretta- 
mente memorizzato in una locazione 
di schermo. 

Le opzioni 

Per rendere il programma facile da 
usare i comandi disponibili sono visua¬ 
lizzati nel blocco in INVERSE nella 
parte bassa dello schermo. È possibile 
visualizzare tre differenti blocchi di 
comandi che possono essere commu¬ 
tati fra loro usando il tasto ESC APE. 
La Figura 3 e la Figura 4 mostrano la 
seconda e la terza serie di comandi che 
sono disponibili ogni volta che viene 
visualizzato l’uno o l’altro blocco. 

I comandi Indietro e Avanti (Con- 
trol-B e Control-F) permettono di ca¬ 
ricare il settore seguente o prece¬ 
dente. 

In alternativa, si può usare il coman¬ 
do di Scelta (Control-S) per specifica¬ 
re il settore che si vuole caricare. 

II comando Stampa (Control-P) 
permette invece di stampare un dump 
del settore che è visualizzato. Il pro- 
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gramma chiede il numero di slot della 
stampante, e consente di arrestare o 
cancellare l’operazione in qualsiasi 
momento introducendo ESCAPE per 
annullare e qualsiasi altro tasto per 
sospendere la stampa. Viene fornito 
un blocco di quindici byte per Tinseri- 
mento di quei caratteri di controllo, 
quali che siano, che possano essere 
necessari per la nostra stampante. 
Questo blocco comincia a $6CD4 (de¬ 
cimale 27860) e deve essere scritto in 
memoria tramite gli opportuni POKE 
prima di eseguire il programma. In al¬ 
ternativa si può introdurre diretta- 
mente nel Disk Zap il codice esadeci- 
male per il controllo della propria 
stampante. Per esempio per introdur¬ 
re CTRL I 80 N si deve battere: 

RESET 

CALL-151 (porta in linguaggio mac¬ 
china) 

6CD4: 89 B8 BO CE (linea da 
battere) 

(le 8 0 N) <— (Spiegazione) 

CTRLC (porta in Applesoft) 
BSAVE DISK ZAP,A$6000,L$CE4 

Così si predisporrà il Disk Zap per 
una stampante standard a 80 colonne 
con interfaccia parallela. Il hstato del 
programma comprende già questa 
predisposizione: per soddisfare esi¬ 
genze diverse bisogna modificare il 
programma seguendo l’esempio ripor¬ 
tato sopra. Si trovano esempi di dump 
per la stampante nelle Figure 6,7 e 8.1 
dati che non possono essere tradotti in 
ASCII sono sostituiti da punti. 

Per uscire dal programma Disk Zap 
si batte Control-X. 

La schermata in Figura 3 offre i co¬ 
mandi di scorrimento del settore vi¬ 
sualizzato al presente con l’impiego 
della freccia destra per scorrere in 
avanti e della freccia sinistra (<—) per 
scorrere all’indietro. Il comando Edit 
(Control-E) permette di cambiare i 
dati nel settore, mentre il comando 
Zap (Control-Z) permette di fare lo 
zap dei dati editati o di tornare allo 
stesso settore da cui erano stati caricati 
o a un settore differente. 

Il terzo blocco di comandi, visibile 
in Figura 4, permette di commutare 
fra il DOS 3.2 e il DOS 3.3 con un 
Control-D, o fra il drive numero 1 e il 
drive numero 2 con un Control-N. 
Queste commutazioni cambieranno il 
display in cima allo schermo, per sape¬ 
re in qualsiasi momento quale DOS e 
quale drive si sta adoperando. Si noti 
che la commutazione fra i DOS non 
permette di leggere un dischetto in 3.2 
dal DOS 3.3 o viceversa. Qualunque 


dischetto si stia cercando di leggere 
deve essere conforme al DOS che si 
sta usando. 

L’editing 

Con il comando di editing viene vi¬ 
sualizzato lo schermo mostrato in Fi¬ 
gura 5. Un cursore lampeggiante mo¬ 
stra la corrente posizione di un editing 
al centro dello schermo. Durante l’o¬ 
perazione non sono più disponibili i 
comandi delle Figure 1 e 2 sostituiti da 
qùelli propri dell’editing visibili in Fi¬ 


gura 5. 

Il programma Disk Zap permette le 
correzioni a tutto schermo del settore 
di dati. Così possono essere toccati o i 
dati esadecimali o i dati ASCII sempli¬ 
cemente introducendo nuovi valori al¬ 
la posizione del cursore. Qualunque 
area si stia editando ogni cambiamen¬ 
to apportato sarà mostrato anche nel¬ 
l’area opposta (e in INVERSE nell’a¬ 
rea esadecimale). 

È possibile spostarsi in qualunque 
punto dello schermo premendo 
ESCAPE, seguito dai tasti I per spo- 
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starsi in alto, J a sinistra, K a destra e 
M in basso. 

Il ricorso agli ESCAPE consente di 
andare e venire fra le aree esadecimale 
e ASCII. Anche le frecce destra e sini¬ 
stra permettono di muoversi senza fa¬ 
re cambiamenti, ma soltanto nell’area 
esadecimale o in quella ASCII. Per 
esempio se si sta lavorando nell’area 
esadecimale le frecce sinistra e destra 
permettono di spostarsi o a sinistra o a 
destra aH’interno di quest’area, ma 
non consentono di passare nell’area 
ASCII. 


Il comando di commutazione del- 
l’ASCII (Control-A) permette di edi¬ 
tare quest’area usando l’ASCII positi¬ 
vo o negativo. Ciò è utile in quanto 
l’Apple è predisposto per visualizzare 
rASCII negativo, mentre l’Applesoft 
impiega l’ASCII positivo. Quando si 
introduce Control-A si cambia o dal- 
l’ASCII positivo al negativo o dall’A- 
SCII negativo al positivo. Il default è 
negativo, e il modo attivo al momento 
è indicato dal segno negativo o positi¬ 
vo che segue l’indicazione di Control- 
A nel blocco in basso. In Figura 5 il 
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Figura 4. 
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Figura 5. 


modo ASCII è negativo. programma chiede se si vogliono ac¬ 

cettare o rifiutare i mutamenti appor- 
Accettazione o rifiuto tati. Se vengono accettati, sono resi 

dei cambiamenti, io Zap permanenti, se invece vengono rifiuta- 

^ ti, lo schermo ripropone quanto era 
Quando si è finito di fare cambia- visualizzato prima dei cambiamenti, 
menti si può premere il tasto RE- Attenzione: l’accettazione dei mu- 
TURN per uscire dal modo editing. Il lamenti influisce solo sui dati che sono 
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all'altezza 
dei tuoi problemi 




Acquistare un computer non è 
sufficiente a risolvere i tuoi pro¬ 
blemi. Devi acquistare quello più 
idoneo all'uso che devi farne. 
Computer Center; la più vasta 
gamma di computer per una 
scelta migliore • validissimo 
team di analisti programmatori a 
tua completa disposizione • tutte 
le periferiche e accessori • corsi 
di formazione professionale • 
Software House. 

Oempuitìar 

VENDITA 

Via Nizza, 48/50/52 
Tel. 844.84.18-86.38.39 
Via Nizza, 26/28/30/32 
Tel. 844.80.22-85.79.57 
ViaSoana(P.za Tuscolo),24/26/28 
Tel. 759.15.44-759.27.90 
Via Prati Fiscali, 257/257a/257b 
Tel. 810.17.60 

ASSISTENZA TECNICA 
Via Terni, 86/86a/86b 
Tel. 757.89.36 



































nella Ram; per cambiare i dati sul di¬ 
schetto bisogna ricorrere allo Zap del 
settore con i dati editati con l’apposita 
opzione. 

Il debugging del dischetto 

Dato che il Disk Zap può cambiare i 
dati contenuti in qualsiasi settore leg¬ 
gibile del dischetto lo si può usare per 
porre rimedio a qualunque problema 
che implichi settori leggibili. La diffi¬ 
coltà sta naturalmente nel sapere che 
cosa occorre sistemare, e come siste¬ 
marlo. I problemi esaminati in questa 
sede non esauriscono certamente l’e¬ 
lenco dei potenziali problemi del di¬ 
schetto, la trattazione indica solamen¬ 
te alcune delle possibili cause dei pro¬ 
blemi considerati. 

Il primo passo da fare quando ci si 
imbatte in un problema con un di¬ 
schetto consiste nel: 

1. togliere il dischetto dal drive 

2. prendere un dischetto conosciuto 
come buono 

3. inserire il dischetto buono 

4. rifare il booting del DOS. 

Poi si provi di nuovo il dischetto che 
presenta dei problemi: se non succede 
nulla il passo consecutivo consiste nel 
fare la mappa del dischetto con un pro¬ 
gramma di Disk Map. Se il disco è 
recuperabile prima di fare il suo zap è 
meglio avere una copia di riserva an¬ 
che se la copia di un dischetto che dà 
problemi sarà un dischetto con gli stes¬ 
si problemi. In questo modo si ha però 
una copia del punto di partenza, per 
farvi ritorno qualora le operazioni di 
riparazione peggiorino le cose anziché 
migliorarle. Purtroppo, però, se c’è di 
mezzo un errore di I/O molti program- 
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HP plotter: 

la sìntesi 




Il tuo personal è capace di pensare, 
quest’è certo. Ma quando si tratta di 
comunicare, a volte gliene mancano i 
mezzi. Con i plotter Hewlett-Packard 

Hai mai fatto caso 
che spesso un piccolo 
grafico esprime più 

che un monte di parole? prendere, 

facUi da spiegare. Tendenze, 
analisi di prodotto, di merca¬ 
to, di vendita, 
previsioni finan¬ 
ziarie prendono 
finalmente cor¬ 
po: in diagram¬ 
mi precisi, 
curve colorate, 
istogrammi, 
grafici circola¬ 
ri... E le tue presentazioni, 
meeting, rapporti diventano 
più “creativi”, incisivi, efficaci. 

Si accelerano i processi decisiona¬ 
li, si aumenta la produttività. I plotter 
Hewlett-Packard sono compatibili con 
i principali personal attualmente sul 
mercato. 


na dal Rivenditore Autorizzato HP 
(ce n’è di sicuro uno vicino a dove 
vivi o lavori): sarà lieto di darti ogni in¬ 
formazione che cerchi. 


Hewlett-Packard Italiana S.p.A. - Via G. 
Di Vittorio, 9 - 20063 Cernusco S/N 
(Milano) - Tel. 02/923691. 

HP-soluzionì produttive 


Li trovi in due versioni: a 


T TTvTT A^^esidero ricevere la documentazione relativa ai plotter 
6 penne, nei lormato UNI A3 la “Graphics Software Guide” per il mio personal computer: 

ed A4, ed a 2 penne, nel for- | □ hp □ ibm □ Apple □ altri | 

matO UNI A4. ^ l js^ome e Cognome_^ I 

Anche in informatica ’ - * 

spesso un piccolo disegno va- | Società-^- 

le più che un monte m paro- | 1 1 

le. Corri a verificarlo di perso- L» ^ ^ ^ _ _ _ _ 


fm HEWLETT 
mLKM PACKARD 


dorland italiana 

























mi di duplicazione non copieranno il 
dischetto. 

Il problema del catalog 

Il primo problema che verrà analiz¬ 
zato è quello in cui non si riesce a fare 
il CATALOG di un dischetto. In que¬ 
sto caso è il DOS che non riesce a 
trovare la Directory non potendo così 
trovare i nomi dei file o il punto di 
locazione delle loro liste di tracce/set¬ 
tori. 

I problemi di catalogazione hanno 
spesso origine nella Tavola del Conte¬ 
nuto del Volume (VTOC). Il DOS 
normalmente cerca la VTOC nella 
traccia $11, settore $0. La VTOC, a 
sua volta, indirizza il DOS airinizio 
della Directory. Questo dovrà essere il 
punto d’inizio. 

Dato che un programma di Disk 
Map non è in grado di aiutarci in que¬ 
sto problema bisogna subito ricorrere 
al Disk Zap e caricare la traccia $11, 
settore $0. Se il Disk Zap è in grado di 
caricare il settore possiamo general¬ 
mente porre rimedio al problema con 
relativa facilità. 

Un esempio di VTOC normale è 
visibile in Figura 8.1 byte da esamina¬ 
re per primi sono nelle locazioni di 
memoria $0 e $02. Questi due byte 
dovrebbero contenere la traccia e il 
settore deU’inizio della Directory. 
Normalmente si tratterà della traccia 
$11, settore $F. Se è effettivamente 
questo il contenuto di $01 e $02 occor¬ 
re guardare la traccia $11, settore $F 
per scoprire quale sia il problema. È 
probabile che uno o più settori della 
Directory siano diventati illeggibili. 

Si cominci con la traccia $11, settore 
$F; se si riceve un messaggio di errore 
di I/O si provi il settore $E e così via 
fino a che si troverà sulla traccia $11 un 
settore leggibile. Si torni alla VTOC 
usando l’opzione di scelta per sceglie¬ 
re la traccia $11, settore $0 e si vada 
nel modo editing. Spostato il cursore 
al byte $02 si introduca il numero di 
settore trovato leggibile. Battuto RE¬ 
TURN, per accettare il cambiamento, 
si scelga l’opzione di zap per fare lo 
zap del cambiamento nella VTOC del 
dischetto. Usciti dal Disk Zap si cata¬ 
loghi il dischetto: il problema dovreb¬ 
be essere risolto. In caso contrario oc¬ 
corre guardare più da vicino la Direc¬ 
tory, e seguire il procedimento esegui¬ 
to per risolvere il problema di un file 
cancellato esaminando più avanti. An¬ 
che se adesso il dischetto a quanto pa¬ 
re fa a dovere il catalogo sarebbe bene 
fare la mappa del dischetto per essere 
sicuri che tutto sia a posto. Sarebbe 
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anche meglio utilizzare il programma 
FID del System Master 3.3 per trasfe¬ 
rire tutti i file su un dischetto appena 
inizializzato. 

È più probabile che i byte $01 e $02 
della VTOC contengano qualcosa di 
diverso da $11 e $0F. Può darsi che si 
trovino valori che sono impossibili co¬ 
me tracce e settori in un dischetto 
DOS 3.3 (per esempio $FF, $83, $C7 e 
via dicendo). Il cambiamento di questi 
byte in modo che puntino la traccia 
$11, settore $F consentirà probabil¬ 
mente di catalogare il dischetto a patto 
che la Directory non sia stata alterata. 

Anche se il catalogo è ora possibile 
può darsi che non si possa ancora acce¬ 
dere ad alcuno dei file. Questo perché 
ci sono nella VTOC altre informazioni 
che il DOS si aspetta di trovare, e che 
invece possono essere state sovrascrit¬ 


te o altrimenti danneggiate. Inoltre se 
la VTOC è stata in qualsiasi modo al¬ 
terata può essere stata danneggiata 
anche la mappa dei bit. Il primo passo 
da fare, comunque, è procurarsi un 
catalogo del dischetto. Si segua perciò 
la procedura descritta sopra fino a 
quando si potrà catalogare il dischet¬ 
to. Il passo successivo consiste nel fare 
la mappa del dischetto con un pro¬ 
gramma di Disk Map. In tal modo si 
saprà se la mappa dei bit è stata o no 
danneggiata. 

Se la mappa del dischetto viene fatta 
a dovere può darsi che il problema sia 
stato risolto. Messa al sicuro una copia 
di riserva si vada avanti e si provi a 
caricare i file. Se vengono caricati il 
problema è risolto, in caso contrario è 
possibile che sia stata sovrascritta an¬ 
che qualcuna delle altre informazioni 


della VTOC. Queste informazioni so¬ 
no descritte a pagina 132 del manuale 
del DOS. Si può semplicemente farne 
lo zap nei byte rilevanti, e questo do¬ 
vrebbe risolvere il problema. 

Se la mappa del dischetto non viene 
fatta a dovere la miglior procedura è 
quella di ricorrere al programma FID 
del dischetto DOS System Master per 
trasferire i propri file su un altro di¬ 
schetto. Una mappa dei bit può natu¬ 
ralmente essere ripristinata, ma è una 
procedura difficile, e in generale è più 
sensato lasciare che l’Apple faccia il 
lavoro per noi. 

Si noti che nessuno di questi metodi 
di riparazione del dischetto in modo 
che faccia il catalogo implica che i no¬ 
stri file siano intatti. Una VTOC e/o 
una Directory alterate significano che 
qualcosa è andato storto e che è stato 
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fatto un danno, non che il danno è 
stato limitato alle informazioni di hou- 
sekeeping a traccia $11. Il solo modo 
per scoprire se i nostri file sono o no 
intatti è quello di esaminarli. 

Ripristino di un fiie 
canceiiato 

Può succedere di cancellare acci¬ 
dentalmente un file, oppure di salvare 
per errore la memoria vuota in un file 
perdendo così tutti i dati salvati sotto 
quel nome. Non è propriamente un 
problema di debugging, è però un im¬ 
piego comune per un Disk Zap e im¬ 
plica lo zap della Directory. Come in¬ 
dicato nell’esame del primo problema 
è talvolta necessario esaminare le voci 
della Directory per stabilire perché un 
dischetto non faccia il catalogo. Può 
anche essere necessario esaminare le 
voci della Directory se un file è listato 
nel catalogo ma non vi si può acce¬ 
dere. 

Un esempio di settore di Directory è 
visibile in Figura 6. I byte $01 e $02 
danno la traccia e il settore del settore 
seguente della Directory. La presenza 
di zeri in questi byte segnala che la 
Directory termina con questo settore. 
Se il dischetto non fa il catalogo a do¬ 
vere questi puntatori sono le prime 
cose da controllare. 

A ciascun file listato nella Directory 
sono assegnati trentacinque byte di 
spazio di Directory. Ogni settore della 
Directory può contenere sette voci, 
cominciando dai byte relativi: $0B, 
$2E, $51, $74, $97, $BA e $DD. I 
primi due byte di ciascuna voce indica¬ 
no la traccia e il settore della lista di 
tracce/settori del file. 

Se un file non può essere caricato è 
importante assicurarsi che questo pun¬ 
tatore punti effettivamente una lista di 
tracce/settori valida. Il terzo byte indi¬ 
ca il tipo di file (per esempio binario, 
Applesoft, testo) e se il file sia o no 
protetto. I trenta byte successivi con¬ 
tengono il nome del file e gli ultimi due 
byte danno la lunghezza. 

I file cancellati possono essere ripri¬ 
stinati perché il DOS non cancella né il 
file né la voce di Directory (a meno 
che non siano stati salvati file in un 
momento successivo alla cancellazio¬ 
ne). Se il DOS cancellasse le voci della 
Directory sarebbe molto più difficile 
ripristinare il file. Ciò che invece il 
DOS fa, è spostare il primo byte della 
voce (il numero di traccia della lista di 
tracce/settori) all’ultimo byte del no¬ 
me del file. Poi mette un $FF nel pri¬ 
mo byte di modo che quando farà la 


ricerca nella Directory questo primo 
byte indicherà che il file è stato cancel¬ 
lato. 

Quando verrà salvato il file successi¬ 
vo questa voce della Directory sarà 
sovrascritta (a meno che il nome del 
file da salvare coincida con il nome di 
un file già nella Directory). 

Per eliminare la cancellazione di un 
file basta rovesciare ciò che il DOS ha 
fatto alla voce della Directory quando 
ha cancellato il file. Si sposti l’ultimo 
byte dell’area del nome di file al primo 
byte della voce, e si metta un blank 
($A0) nell’ultimo byte del nome del 
file. Adesso il file sarà listato quando 
si farà il catalog del dischetto, e il DOS 
sarà in grado di trovare la lista di trac¬ 
ce/settori del file e potrà quindi acce¬ 
dervi. 

Tuttavia se adesso si fa la mappa del 
dischetto con un programma di Disk 
Map si constaterà che i settori che il 
file ha nella sua lista di tracce/settori 
sono ancora listati nella mappa dei bit 
come settori liberi. Questo perché il 
DOS riaggiusta la mappa dei bit quan¬ 
do cancella un file, e se questa opera¬ 
zione viene trascurata quando si ripri¬ 
stina un file di DOS finirà per sovra- 
scriverlo qualunque cosa dicano la Di¬ 
rectory e la lista di tracce/settori. 

Si può ovviamente usare il program¬ 
ma Disk Zap per fare lo zap della map¬ 
pa dei bit. Ma a meno che ci sia una 
ragione particolare per farlo è meglio 
far fare il lavoro all’Apple, in quanto si 
tratta di un procedimento tedioso in 
cui è facile commettere errori. È possi¬ 
bile seguire due procedimenti: carica¬ 
re il file, cancellarlo dal dischetto e 
risalvarlo, usare il FID per trasferire il 
file su un altro dischetto, cancellare il 
file dal primo dischetto e se si vuole, 
usare il FID per ritrasferire il file sul 
primo dischetto. 

Anche se il secondo passo di en¬ 
trambe le procedure può sembrare su¬ 
perfluo è invece essenziale che si can¬ 
celli il file prima di risalvarlo. 

Quando il DOS salva un file con un 
nome che trova in Directory, utilizza i 
settori listati nella lista di tracce/settori 
per quel file e presuppone che questi 
settori siano marcati come utilizzati 
nella mappa dei bit. 

È questa un’efficace scorciatoia per 
il DOS, ma rischia di rendere vani i 
nostri sforzi quando tentiamo di adat¬ 
tare la mappa dei bit. 

È pertanto buona regola cancellare 
il file dalla Directory prima di risalvar¬ 
lo, in modo che il DOS consideri il file 
come nuovo e adatti così la mappa dei 
bit. 
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Sistemare una lista 
di tracce/settori 

Un altro problema che accade di 
frequente è quello di trovarsi I/O ER- 
ROR quando si accede a un file. Due 
sono le implicazioni di un errore del 
genere: 1. almeno un settore di dati è 
stato perduto; 2. il DOS smetterà di 
caricare il file quando raggiungerà il 
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primo settore cattivo, perdendo tutti i 
dati successivi. Se è stata fatta una co¬ 
pia di riserva del file non c’è ragione di 
preoccuparsi per il ripristino di quanto 
più è possibile del file. 

Una volta che il settore è diventato 
illeggibile i dati contenuti devono es¬ 
sere considerati perduti. Si possono 
però recuperare i dati che sono nei 
restanti settori. Il primo obiettivo è 


quello di apportare alcune modifiche 
al dischetto, in modo che il DOS per¬ 
metta di accedere a quanto più è possi¬ 
bile del file. Una volta entrati nel file 
sarà possibile tentare di ripristinare i 
dati che erano nel settore^ cattivo. 

Il primo passo di questo procedi¬ 
mento consiste nel fare la mappa del 
dischetto per scoprire quanta parte del 
file sia illeggibile, ed esattamente di 
quali settori si tratti. Se dopo aver fat¬ 
to la mappa del dischetto si ritiene che 
valga la pena di cercare di ripristinare 
il file si stampi una copia della lista di 
tracce/settori per il file o si prenda ap¬ 
punto dei settori cui non si può accede¬ 
re e della locazione dell’inizio della 
lista di tracce/settori del file. Con que¬ 
ste informazioni si può usare il Disk 
Zap per modificare la lista di tracce- 
/settori per poter accedere a quanto 
più è possibile del file. Si esegua con 
BRUN il Disk Zap e si carichi il primo 
settore della lista di tracce/settori. 

Un esempio di lista di tracce/settori 
normale è visibile in Figura 7. Come 
nel caso dei settori della Directory i 
byte $01 e $02 puntano il settore nel 
quale sarà trovata un’eventuale conti¬ 
nuazione della lista. La lista vera e 
propria comincia con il byte di settore 
$0C e consta di copie di tracce e setto¬ 
ri. Per la maggior parte dei file la lista 
di coppie sarà continua e terminerà 
quando sarà raggiunta una coppia di 
traccia/settore di $00,$00. 

Nel caso dei file di testo ad accesso 
casuale, il DOS assegna spazio nella 
lista a settori che non contengono an¬ 
cora dati ma che sono sul piano teorico 
necessari per il calcolo di altre locazio¬ 
ni di record. Queste locazioni vuote 
sono indicate da una coppia $00,$00. 
Un esempio di lista di tracce/settori di 


Figura 9. 
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« 'NEW APPLE 

PERSONAL COMPUTER 48K • Compatibile APPLE II +, keipad numerico 
PORTCOM II • Elaboratore portatile 64K 2 PO, int. par+ser, CRT, comp. 
Apple II 

SCREENMASTER 80 • 8* colonne testo caompatibiie CP/M 

PASCAL SPREAD SHEET BASIC 

DISK DRIVE • low cost SLIM LINE compatibile DOS 3.3 

DISK CONTROLLER CARO • Interfaccia per due drives 

DIGICOOER • Scheda acquisizione per encoder ottici due canali 8+8 

DIGIT 

MUSICAL CARD ■ Sintetizzatore a tre voci con amplificatore stereo e 
speaker 

SPEECH CARD • Sintetizzatore vocale di fonemi preampl. + software 
MiOi W/SOFT & FUTURE SHOCK • Sistema polifonico sintetizzatore 
professionale 

DX1 SOUND SAMPLING SYSTEM • Sistema acquisizione suoni con soft¬ 
ware elaborazione 

PRINTER INTERFACE OKI ■ Low cost completa di cavo segnali 
SUPER PRINTMASTER III ■ Interfaccia per stampanti grafiche (specifi¬ 
care modello) 

64K BUFFER GRAPPLER W/CABLE - Buffer per stampante + interfaccia 
parallela 

IEEE 488 - Interfaccia per BUS GPIB 

MICRO BUFFER SER/PAR W/CABLE - Int. Par/Seriale bufferizzata con 
cavo segnali 

PARALLEL PORT - Interfaccia 24 PORTE TTL I/O con 8255 
SERIAL INTERFACE RS232 - Baud rate selezionabili compatibile CCS 7710 
ASYNCHR RS232 - Interfaccia seriale asincrona RS232/C baud rate 
50-19200 

XAD-I • A/D converter 12 bit lOmS 4 canali+ REAL TIME 
CLOCK + tampone 

XAD-2 • A/D converter 12 bit lOmS 2 canali fissi+ 3 VARIABILE GAIN 
Il 04 - A/D converter 12 bit 8 canali VARIABILE GAIN 25 MicroSec/ciclo 
A/D D/A 12BIT 8 CHANNELS - A/D converter 20mS 8 canali 12bit + D/A 
1 canale 12 bit 

O/A CARD 16 BIT I/O PORT - D/A converter 16 bit 2 canali con I/O TTL 
2 canali 

A/D CARD 8 BIT 16 CHANNELS - A/O convcerter 16 canali 8 bit 0-5 V 
A/D O/A CARD 8 BIT 16 CHANNELS - A/O converter 8 bit 16 canali con 
D/A converter 

48KBytes CPU board - Scheda UNITÀ CENTRALE DI PROCESSO 
SWITCHING POWER SUPPLY - Alimentatore 220V 50Hz per APPLE II +le 
JOYSTICK - Doppio pulsante meccanica dì precisione 
Scheda 16K RAM (PASCAL) 

Espansione 128KBytes RAM per APPLE 11+/e e compatibili 
TELERASTER - Digitalizzatore immagini video composito 256*256 64 livelli 
IMAGE PROCESSOR CARD - Digitalizzatore immagini video 16 livelli + 
software elabor. 

TV CAMERA W/Opticais 16mm - Composite-Video adatta a TELERASTER 
PAL COLOR CARD - Codificatore PAL per utilizzate video o TV 
RGB COLOR CARO - Decodificatore RGB per Apple II + e compatibili 
R.F. MOOULATOR • Con deviatore per utilizzare come monitor un tele¬ 
visore 

REPLAY II - Per aprire dischetti protetti generando files DOS 3.3 
TIME II CARD - Reai time clock con batteria tampone 
I.C. TESTER CARD - Prova integrati serie TTL MOS RAM con software 
(TTL free) 

8748/8749 PROGRAMMER - Programmatore Microprocessori con EPROM 
interna 

EPROM WRITER • programmatore EPROM 2708 - 2732 
PROGRAMMATORE WRITER HK128 - Programmatore EPROM 2716-27128 
con software 

LOBOT 1 ROBOT - Interf. APPLE con contr. infrarossi 
semovente + software 

FOX 8088 - Espansione 16bit con processore 8088 e CP/M86 MS/DOS 
Z80 CARD - Scheda processore Z80 per compatibilità CP/M 
BUFFER 8K CENTRONICS - Buffer esterno per stampanti linea OKI pa¬ 
rallele 

HARDWARE PER MICR016 BIT COMP. IBM 

16 BIT PERSONAL COMPUTER - 6 slot 128-256K drives 360k+controller tastiera 
16 BIT PERSONAL COMPUTER XT - 128k RAM FD 360K + cont. HARD-DISK 
lOMBytes Keyboard 

A/D converter 25MicroSec/Ciclo D/A converter 12bit PC/XT 
Controller per 4 floppy DISK DRIVERS per IBM PC/XT 
Storage System per IBM PC/XT e compatibili 
Interfaccia parallela per stampante per PC/XT e comp. 

Interfaccia di comunicazione RS232 per PC/XT 
Reai time clock parallel port Ram expander 
Reai time clock parallel pori Ram expander 256 K RAM 
COLOR GRAPHICS CARD - Interfaccia colore per IBM PC/XT e compatibili HI-RES 
MONOCHROME GRAPHICS CARD - HIGH-RESOLUTION GRAPHICS compatibi¬ 
le Soft per PC/XT e comp. 

GREEN 12“ MONITORS - Composite video case plastico 

RGB COLOR MONITOR • Monitor a colori interfacciabile anche con APPLE II 

Plotter 6 penne 15 cm/sec FLAT TABLE form. A3 

STAMPANTI PERAPPLBIBM 

OKI ML 80 - 80 col. 80CPS. semigr.FRIZ. + PIN-FEED.interf.parallela 
OKI ML 82/A - 80 col. 120CPS. bidirez.grai.PIN-FEE0 + FRIZ.interf.parall + ser. 
OKI ML92 - 80 col. 160CPS GR. NLQ FRIZ.+PIN-FEED interf.paralleia 
OKI ML 83 -136 col. 120 CPS.FRIZ.+TRAnORE.GR. Int. parallela + seriale 
OKI ML 93 -136 col. 160 CPS.GR.NLQ.FRIZ.+TRAnORE. int. parallela 
OKI ML 84 - 136 col. 200 CPS. FRIZ.+TRAnOREGR.NLQ.interf.parallela 
DATAPRODUCTS - 80 col.180CPS.NLQ.GR.FRIZ.+PIN-FEED.interf.parall + seriale 
GRAPHIC UPGRADE ML82/A 83/A - Set EPROM per upgrade GRAFICA su prin- 
ters ML82/A o ML83/A 
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file di testo ad accesso casuale è visibi¬ 
le in Figura 9. Si noti che le coppie 
$00,$00 di questa lista fanno da segna¬ 
posto per i settori non assegnati e non 
indicano la fine della lista come si ha in 
Figura 7. 

La riparazione della lista di tracce- 
/settori per un file di testo ad accesso 
casuale è la procedura più semplice. 
Basta trovare la coppia traccia/settore 
che ha generato l’errore nella lista e 
sostituirla con una coppia $00,$00. 
Questo dice al DOS che in questo set¬ 
tore non è stato assegnato alcun re¬ 
cord e quindi non è stato ancora asse¬ 
gnato alcun settore del dischetto. Si 
noti che questo non ripristina alcun 
dato perduto, né ci dice quali dati 
manchino dal nostro file: si limita a 
liberare quello spazio nella lista in mo¬ 
do da rendere possibile ripristinare i 
dati mancanti e scrivere nei record che 
sarebbero normalmente immagazzi¬ 
nati lì. Come vantaggio collaterale il 
settore cattivo è ancora marcato come 
utilizzato nella mappa dei bit di modo 
che il DOS non cercherà di usarlo di 
nuovo. 

Per altri tipi di file la procedura non 
è altrettanto semplice, dato che inse¬ 
rendo un $00,$00 nella lista di tracce/ 
settori si direbbe al DOS che la coppia 
$00,$00 è la fine della lista. Quel che si 
deve fare, quindi, è mettere una cop¬ 
pia traccia/settore leggibile nella loca¬ 
zione in cui è listato il settore cattivo. 
Lo possiamo fare o ripetendo la cop¬ 
pia traccia/settore che precede o segue 
la parte cattiva, oppure spostando la 
parte della lista che segue quella catti¬ 
va in su di due byte per eliminare il 
settore cattivo, o, ancora, inserendo 
un settore fittizio nella lista in luogo 
del settore cattivo. 

Riparando questo danno del file è 
importante ricordare che quando il 
DOS salva un file non rispetta alcun 
confine che il file possa normalmente 
avere. Per esempio è senz’altro possi¬ 
bile che una linea di programma Ap¬ 
plesoft spazi in due settori, e anche un 
record di un text file (ad accesso casua¬ 
le o sequenziale) può spaziare in due 
differenti settori. Quindi, quando si 
elimina un settore o si ripete un settore 
o si elimina semplicemente l’interval¬ 
lo, si può dare un aspetto alquanto 
singolare al programma. Per questa 
ragione può essere desiderabile inseri¬ 
re nella lista un settore fittizio ricono¬ 
scibile, in modo che Tintervallo man¬ 
cante possa essere facilmente indivi¬ 
duato. Per creare un simile settore fit¬ 
tizio si usi il programma Disk Map per 
trovare un settore libero (in alternati¬ 
va si usi il settore del DOS a traccia $2, 


settore $F, che il DOS reclama ma non 
usa), e se ne faccia lo zap con lo stesso 
valore in ciascun byte. Per comodità è 
utile un carattere ASCII positivo co¬ 
me $41 (“A”). Se il file è un file Apple¬ 
soft sarà necessario intercalare un paio 
di byte $00 lungo tutto il settore per 
indicare la fine di ciascuna delle linee 
Applesoft, e se il file è di testo può 
essere necessario inserire alcuni RE¬ 
TURN ($8D) per rendere il file più 
facile da leggere. Adesso si faccia lo 
zap della traccia e del settore di questo 
settore fittizio nella lista di tracce/set¬ 
tori al posto del settore cattivo. Si do¬ 
vrebbe essere ora in grado di caricare 
il file o di usare il FID per trasferirlo su 
un altro dischetto. Dato che il settore 
fittizio ha inserito una serie di caratteri 
ripetuti (per esempio una serie di 256 
A), nel file questi dati distintivi do¬ 
vrebbero permettere facilmente di 
trovare gli esatti confini dell’intervallo 
mancante e sostituirlo. 


Altri problemi 

I tre problemi che sono stati esami¬ 
nati qui rappresentano soltanto alcuni 
dei modi in cui si possono manifestare 
danni nei dischetti. Scopo della tratta¬ 
zione dei problemi presentati in que¬ 
sto articolo è stato quello di fornire 
esempi di problemi comuni e di sugge¬ 
rire qualche idea sul modo in cui usare 
i programmi di Disk Map e Disk Zap 
per porvi rimedio. 

Affrontando i problemi del dischet¬ 
to che non sono trattati qui, o non 
sono eliminati dalle soluzioni esami¬ 
nate, il miglior mezzo di consultazione 
è il manuale del DOS. L’Appendice C 
è particolarmente utile in quanto si 
possono trovare i particolari della 
VTOC, della Directory e delle liste 
tracce/settori. Se si affrontano in ma¬ 
niera metodica i problemi che si incon¬ 
trano, e si usano gli strumenti presen¬ 
tati in questi articoli per raccogliere 
informazioni, si ha una buona proba¬ 
bilità di risolvere i problemi dei di¬ 
schetti e di mettere in salvo la maggior 
quantità possibile di dati in pericolo. 

Prima di tentare di sistemare i di¬ 
schetti che occorre veramente ripristi¬ 
nare sarebbe bene impratichirsi a fon¬ 
do dei programmi di Disk Map e Disk 
Zap, in modo da sentirsi a proprio agio 
adoperandoli. Il miglior modo per far¬ 
lo consiste nel fare una copia di uno 
dei propri dischetti e usarlo come di¬ 
sco di prova, in modo da poter seguire 
qualcuna delle procedure suggerite in 
questi articoli come se si avessero i 
problemi descritti. Ci si potrà così sen- 




tir liberi di fare esperimenti con diversi 
cambiamenti, per vedere quali effetti 
avranno sulla maniera in cui il DOS 
legge il dischetto. Questo dovrebbe a 
sua volta dare una migliore intuizione 
di quello che sta succedendo quando ci 
si trova di fronte a un problema di 


dischetto, e dovrebbe quindi aiutare a 
diagnosticare il problema con maggio¬ 
re rapidità ed efficienza. 

Un ottimo esercizio può essere 
quello di applicare il Disk Zap a picco¬ 
li trucchetti che Applicando propone 
qui di seguito. 

® 1984 by Nibble e Applicando 



Volete personalizzare l’HELLO dei 
vostri dischetti facendo in modo che a 
salutarvi faccia capolino il vostro stesso nome? 
Oppure volete evitare che sguardi estranei possano 
leggere i listati dei vostri programmi? 

Ecco come dovete fare. 


Con qualche 
$ in più 


C ome molti di voi già sanno, un 
dischetto inizializzato in DOS 3.3 
viene diviso in 35 tracce e in 16 settori. 
Il DOS (Disk Operating System) oc¬ 
cupa le prime tre tracce (quelle ester¬ 
ne di un dischetto) e precisamente la 
$00, $01 e $02. La traccia destinata a 
contenere le informazioni del CATA- 
LOG e della Tabella dei Volumi degli 
Indici (VTOC) è invece la $11. Il se¬ 
gno $ del dollaro che precede il nume¬ 
ro di traccia sta a indicare che la nume¬ 
razione viene eseguita in esadecimale 
(in questo sistema, all’ultima traccia 
decimale 34 corrisponde la traccia esa¬ 
decimale $22). 

Per modificare queste tracce si deve 
entrare a spiare l’interno del sistema 
operativo dell’ Apple. Per prima cosa 
fate una copia del dischetto System 
Master e lavorate su questa. In secon¬ 
do luogo, dato che non è facile leggere 
determinate tracce ed eseguire poi al¬ 
cune modifiche all’interno di esse 
usando solo la tastiera e la propria co¬ 
noscenza del modus operandi della 
macchina, è conveniente usare pro¬ 
grammi che facilitino questo compito. 
Tra quelli che possono risultare più 
utili allo scopo, vi segnaliamo il CIA, il 


BAG OF TRICKS il BYTE ZAP, il 
LOCKSMITH che con i loro Nibble o 
Sector Editor si adattano benissimo a 
questo lavoro. 

Personalizzare il catalog 

Ecco qualcosa di semplice e diver¬ 
tente. Si è mai pensato di cambiare il 
messaggio DISK VOLUME 254 che 
appare in testa al CATALOG del di¬ 
sco, in qualcosa di più personale? Ad 
esempio: 

MARCO ROSSI 254 


Farlo richiede solo pochi minuti, a 
fronte di un risultato che personalizza 
e individua facilmente i vostri dischet¬ 
ti. Bisogna leggere la traccia $02, set¬ 
tore $02 e cambiare il messaggio DISK 
VOLUME, scritto al contrario, che 
inizia al byte $B0. Anche il nome da 
sostituire deve essere scritto al contra¬ 
rio, cioè partendo dal basso a destra 
per salire a sinistra. Se per esempio si 
scrive MARCO ROSSI, le linee $A8- 
$B8 dovrebbero apparire così: 
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Figura 1. Il disegno mostra come il DOS alloca le tracce nel disco. 


A8: C9 CI C2 D3 D2 CI C2 AO :IAB- 
SRAB 

BO: C5 CD D5 CC CF D6 AO CB 
:EMULOV K 

B8: D3 C9 C4 04 11 OF 03 00 :SIDD- 
QOD@ 


Se il nome scritto risulta più corto 
dell’intestazione DISK VOLUME bi¬ 
sognerà cancellare le lettere in eccesso 
per non avere la sovrapposizione di 
due scritte; allo scopo inserite tanti 
$ AO quante sono le lettere da cancella¬ 
re premendo la barra spaziatrice un 
certo numero di volte. 

Attenzione però a non eccedere in 
lunghezza: nella linea $A8 i byte C9 
CI C2 D3 D2 CI C2 non devono esse¬ 
re toccati così come non devono essere 
cambiati i byte 04 11 OF 03 00 della 
linea $B8. 

Fatte le correzioni bisogna riscrive¬ 
re sul dischetto, usando il programma 
Disk Zap, pubblicato nelle pagine pre¬ 
cedenti di questo stesso numero dii Ap¬ 
plicando, il settore $02 della traccia 
$02. 

E’ possibile eliminare anche il nu¬ 
mero di volume, cioè il 254: si deve 
allora provvedere a leggere la traccia 


$01 e il settore $0C e poi battere tre 
ÈA dal byte $C0 al byte $C2. 

Tutta la linea $C0 dovrebbe appari¬ 
re così: 


CO: EA EA EA 20 2F AE 20 2F 


Una volta riscritto anche questo set¬ 
tore, quando si esegue il CATALOG 
del dischetto appare la nuova intesta¬ 
zione: 


MARCO ROSSI 

A 002 HELLO 
A 043 ECC ECC 

Come nascondere 
il file hello 

Questo semplice trucco renderà la 
vita difficile a chi vuole penetrare nei 
vostri programmi. Bisogna prima leg¬ 
gere la traccia $11 e il settore $0F. Poi, 
usando sempre il programma Disk 
Zap, posizionarsi con il cursore sopra 
il primo AO che si trova dopo il nome 
del file HELLO e, con pazienza, digi¬ 
tare diciannove volte 88, facendo at¬ 


tenzione a non sbagliare. 

A questo punto bisogna in qualche 
modo informare il DOS del piccolo 
trucco che è stato apportato, in modo 
che esso riconosca ugualmente il file 
HELLO nelle operazioni di BOOT. 
Dopo aver riscritto questa traccia e il 
settore su disco, bisogna leggere la 
traccia dovè il DOS riloca il CATA¬ 
LOG e cioè la $01, settore $09. Ora 
non si deve fare altro che digitare di 
nuovo quei diciannove 88 dopo il no¬ 
me del file HELLO e riscrivere il set¬ 
tore. A questo punto il file HELLO 
parte automaticamente quando viene 
eseguito il BOOT del dischetto modi¬ 
ficato mentre ogni comando DOS rife¬ 
rito a HELLO è ignorato in quanto 
questo file contiene adesso diciannove 
caratteri di controllo aggiuntivi. An¬ 
che nel CATALOG, l’HELLO non 
compare più nell’elenco dei files con¬ 
tenuti nel dischetto. 

Ecco spiegato il trucco :il byte $88 
corrisponde in codice ASCII a un 
CTRL H, cioè alla freccia sinistra. 
Succede quindi che l’HELLO appare 
per una frazione di secondo, il tempo 
cioè per permettere al file seguente di 
sovrapporsi ad esso cancellandolo 
completamente. Questo trucco lo ren¬ 
de praticamente invisibile. Un’ultima 
avvertenza: per potere funzionare, il 
nome del file HELLO non deve essere 
più lungo di 11 caratteri, poiché il 
DOS accetta solo 30 caratteri per file. 

Come cambiare II file hello 

È possibile anche far fare il BOOT a 
un qualsiasi programma Applesoft che 
non sia quello con cui si è inizializzato 
il dischetto (file HELLO). Anche in 
questo caso bisogna leggere la traccia 
$01 e il settore $09. A partire dal byte 
$75 nella linea $70 si troverà il nome 
del file HELLO. Se si vuole cambiare 
file per il BOOT si deve posizionare il 
cursore sopra la prima lettera del file 
HELLO (H=$C8) e digitare il nome 
del nuovo file che si desidera far parti¬ 
re. Se il nome del nuovo file è più corto 
di HELLO o del nome con cui si è 
inizializzato il dischetto, bisogna ricor¬ 
darsi di cancellare i caratteri in eccesso 
con degli AO (in ASCII è lo spazio) 
prima di riscrivere la traccia sul di¬ 
schetto. 

File hello 
binari o di testo 

Di solito il DOS esegue un comando 
RUN per far partire il file HELLO. Lo 
si può cambiare in un comando BRUN 
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o EXEC a seconda che si voglia un file 
HELLO binario o di testo. 

Leggete quindi la traccia $00 nel set¬ 
tore WD per operare un cambiamen¬ 
to. Più precisamente dovete sostituire 
al byte $42 lo 06 con un 34 se il file che 
si vuole far partire è binario, con un 14 
se è di testo. Ecco come dovrebbero 
presentarsi le tracce indicate: 


40: 03 A9 06 DO 05 AD 62 AA per un 
file HELLO in Applesoft 
40: 03 A9 34 DO 05 AD 62 AA per un 
file binario 

40: 03 A9 14 DO 05 AD 62 AA per un 
file di testo. 


Come togliere le pause 
nel catalog 

Se si hanno molti files su un disco e 
si preferisce che Telenco di questi files 
durante il CATALOG non si blocchi a 
fondo pagina nell’attesa di un input da 
tastiera basta apportare questa sem¬ 
plice'modifica. Dopo aver letto la trac¬ 
cia $01 e il settore $0D bisogna cam¬ 
biare al byte $34 il CE con un 60 in 
questo modo: 

30: 8D 20 ED FD 60 9D B3 DO 


Attenzione poi a riscrivere il settore 
modificato sul dischetto. 

Protezione dal 
CTRL RESET 

Chiunque può leggere un vostro 
programma premendo CTRL RE¬ 
SET: listerebbe così comodamente 
quello che a voi magari è costato mesi 
di fatica. Per evitare che eventuali 
spioni copino tranquillamente il vo¬ 
stro lavoro potete modificare l’input 
che i tasti CTRL RESET mandano 
alla macchina. Bastano qusti due truc¬ 
chi perché ogni volta che qualcuno 
preme CTRL RESET il computer fac¬ 
cia automaticamente il BOOT del di¬ 
sco, simulando lo spegnimento e l’ac¬ 
censione della macchina. Si può segui¬ 
re la strada da Applesoft semplice- 
mente inserendo nelle prime linee del 
file HELLO due POKE, e cioè: 

POKE 1010,0 : POKE 1011,0 


Il trucco è però facile da scoprire. 

Una protezione della protezione si 
può ottenere leggendo la traccia $00 e 
il settore $0D e cambiando il byte $37 
della linea $30 da un 45 ad un FF: 


30: AD 53 9E 8D F3 03 49 FF 

Ora non resta che riscrivere il tutto 
sul dischetto, e il gioco è fatto. 

Protezione dal CTRL C 

Bisogna però sottolineare un’altra 
cosa: anche un CTRL C a volte basta 
per interrompere un programma e li¬ 
starlo. Si può ovviare al problema con 
una semplice aggiunta al programma 
nelle prime e ultime linee. 


5 ONERR GOTO 1000 : REM routi¬ 
ne di controllo degli errori 
1000 ER = PEEK (222) : REM codice 
errori 

1010IF ER = 255 THEN GOTO 1100 
: REM 255 è il codice per l’interruzio¬ 
ne CTRL C 

1020 HOME : VTAB 21 
1030 PRINT “ERRORE NUMERO” 
; ER : REM errore generico 
1040 END 

1100 HOME : TEXT :HOME 
ino CALE - 1370 : REM esegue il 
BOOT del dischetto 


Il risultato è identico a quello che si 
ottiene nel caso venga premuto un 
CTRL RESET. 

Se invece del BOOT preferite mo¬ 
strare nei confronti di chi tenta di in¬ 
terrompere un programma con CTRL 
C un certo disappunto, sostituite la 
linea 1110 con la riga a loop riportata 
qui sotto: 

ino FOR X = 1TO 11 : CALL 64239 
+ X : NEXT X : GOTO 1110 


oppure con quest’altra: 


ino CALL - 2000 : GOTO 1110 

Concludendo: abbiamo elencato 
qualche trucco per evitare che i vostri 
programmi possano essere listati e co¬ 
piati troppo facilmente. Ma chi ha or¬ 
mai dimestichezza con queste cose sa 
bene quanto sia vano cercare di pro¬ 
teggersi in assoluto: la migliore delle 
protezioni resiste solo agli attacchi 
meno insistenti. La protezione vera 
sta solo nella convinzione, decisa a far¬ 
si strada, che il lavoro altrui va rispet¬ 
tato, e che copiare talvolta è uguale a 
rubare. 

Marco Tennyson 
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Per trasmettere avvisi, notizie, a colleghi e familiari 
l’ideale sarebbe uno di quei tabelloni elettronici usati negli 
aeroporti. Inutile dire però che si tratta di apparecchiature 
dal costo proibitivo. Perché non ricorrere allora 
al personal computer? Poche ore alla tastiera sono sufficienti 
per disporre di un efficace centro messaggi. 



A ciascuno 
suo messaggio 


S i può usare in casa o in ufficio per 
trasmettere a colleghi, familiari e 
amici messaggi, evitando l’uso dei tra¬ 
dizionali foglietti di carta che, per un 
motivo o per l’altro, finiscono spesso 
per non essere letti dal destinatario 
della comunicazione: è un programma 
capace di trasformare qualsiasi Apple 
(a patto che disponga di almeno 32K) 


in un vero e proprio centro elettronico 
per lo smistamento di messaggi, che 
ricorda appuntamenti, chiamate tele¬ 
foniche o altre informazioni come 
un’efficiente segretaria. 

Una volta caricato, il programma dà 
la possibilità di dare un nome (o un 
titolo) al messaggio. Così chi leggerà il 
contenuto del dischetto potrà fare una 


scelta e, per esempio, leggere soltanto 
le comunicazioni intestate al suo no¬ 
me. Naturalmente il sistema può an¬ 
che essere utilizzato negli uffici che 
dispongono di più terminali, per inol¬ 
trare comunicazioni a più persone 
contemporaneamente; i file, una volta 
salvati, rimangono memorizzati, con¬ 
sentendo di spegnere il computer sen- 
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za che i messaggi vadano perduti. 

L’avvio 

Quando si fa girare il programma, 
viene presentato all’utente il menù 
principale del programma. Sulla base 
del menù si può: 

1. DISPLAY FILE 

2. AGGIUNTA A UN FILE 

3. CREAZIONE FILE 

4. CAMBIO/MODIFICA 

5. CANCELLAZIONE FILE 

6. ELENCO FILE 

7. FINE PROGRAMMA 

Per la prima esecuzione è preferibi¬ 
le scegliere l’opzione 3, CREAZIO¬ 
NE FILE. Provare prima una delle 
altre opzioni, infatti, farebbe apparire 
un messaggio di NESSUN TITOLO 
NEL FILE, e il programma tornereb¬ 
be al menù principale. Tornando al¬ 
l’opzione 3 (linee 3000-3170), ecco co¬ 
me si aggiunge un nuovo file. 

La prima cosa che sarà chiesta all’u¬ 
tente è un nuovo nome di file, non più 
lungo di dieci caratteri. Una volta in¬ 
trodotto questo nome, il programma 
controlla se ci sia duplicato, affinché 
non si scriva sopra un file esistente. Se 
non si ha riscontro di duplicato verrà 
richiesto all’utente il messaggio, che 
può essere lungo fino a 224 caratteri. 
Perché non si debba stare a chiedersi 
se il messaggio che si scrive è troppo 
lungo, verranno visualizzati 224 carat¬ 
teri di sottolineatura. Qualora si vada, 
introducendo l’annuncio, oltre questa 
lunghezza verrà dato all’utente un 
messaggio di errore, e si dovrà reintro¬ 
durre la comunicazione. Il programma 
comprende una routine di formatta¬ 
zione (impaginazione) del testo per la 
visualizzazione dei messaggi, per evi¬ 
tare che le parole vengano spezzate da 
riga a riga quando i messaggi saranno 
visualizzati. Questa routine di format¬ 
tazione sarà descritta più avanti. 

A questo punto del programma c’è 
una routine in BASIC per “Immettere 
qualsiasi cosa” (linee 8000-8070). An¬ 
ziché aggiungere una routine in lin¬ 
guaggio macchina per consentire l’im¬ 
missione di caratteri come la virgola e i 
due punti, è stata utilizzata una carat¬ 
teristica che già esiste nell’Apple, il 
buffer tastiera. 

Ogni volta che si introducono dati 
tramite tastiera, essi vengono messi 
nel buffer tastiera, che è situato dalla 
locazione decimale di memoria 512 al¬ 
la 767 ($200-2FF). Per mettere in que¬ 
sto buffer l’input da programma è ne¬ 
cessario chiamare la subroutine 
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28 

38 

48 

58 

68 

180 

118 

120 

138 

148 

142 

145 


147 

158 

lé8 

170 

180 

I9B 

200 

218 


REM 

REM 

REM 

REM 

REM 

REM 


« MESSAGGIO < 
» (C) 1984 * 
«APPLIC^OO ♦ 
» 4 MICROSPARC* 


POKE 7é8,184: POKE 769.168; POKE 778.184; POKE 771.166; POKE 772,223; POKE 
773.154; POKE 774,72; POKE 775,152; POKE 776,72; POKE 777,96 
ONERR GOTO 32888 


POR I = 1 TO 22; PRIMI 


OIM TI$(100),ME$(100),MD$(100) 

TEXT ; HOME ; IWERSE ; PRINT " 

•; NEXT ; PRINT “ VTAB I 

VTAB 2; HTAB 2; PRINT 'M'; HTAB 3; VTAB 3; PRINT 'E*; VTAB 4: HTAB 4; PRINT 
*M"; HTAB 5* VTAB 5* PRINT ’O" 

VTAB 6; HTAB 2; PRINT 'F*; VTAB 7; HTAB 3; PRINT ’R'; HTAB 4; VTAB 8; PRINT 
"0*; ‘/TAB 9; HTAB 5; PRINT "M* 

'TTAB 12; HTAB 4: PRINT 'A"; HTAB 4; PRINT "P"; HTAB 4; VTAB 14; PRINT " 

P“; VTAB 15; HTAB 4; PRINT 'L'; HTAB 4; VTAB 16; PRINT "I"; VTAB 17; HTAB 
4; PRINT *0" 

VTAB 18; HTAB 4; PRINT 'A'; VTAB 19; HTAB 4; PRINT 'N*; VTAB 20; HTAB 4 
; PRINT “0*; HTAB 4; VTAB 21; PRINT "0' 

VTAB 1; FOR I = 8 TO 40; HTAB I; PRINT * ';; NEXT 
FOR I = 2 TO 23; VTAB I; HTAB 40; PRINT ' NEXT 

VTAB 24; FOR I = 8 TO 39; HTAB I; PRINT * NEXT 

POKE 2039,32 

mmi ; POKE 32,7; POKE 33,32; POKE 34.1; POKE 35,23; HOME 
4;A$ = '«MENU PRINCIPALE»'; GOSUB 11000 
RESTORE ; FOR I = 1 TO 7; READ A$(I); PRINT ;A$ = A$(I); GOSUB 11000; NEXT 


220 PRINT ; PRINT ' QUALE GET A$; PRINT A$; IF A$ < OR A$ > '7 

' THEN HOME ; GOTO 200 

230 A = VAL m)ì ON A GOSUB 1800,2008,3888,4000,5888,6000,7880 

240 CLEAR ; HOME ; GOTO 200 

1008 REM ;;;VISUALIZZA UN FILE;;; 

1810 HOME ; VTAB 12; PRINT ' NOME DEL FILE FOR I = 1 TO 18; PRINT CHR$ 
(95);: NEXT ; PRINT ; VTAB 12; HTAB 17; INPUT ";A$; IF = " THEN RETURN 

1020 IF LEN (A$) > 10 THEN 1880 
1030 IF FL = 1 THEN FL = 0; GOTO 1058 
1840 GOSUB 15008 

1850 FOR I = 1 TO CO - 1; IF A$ = TI$(I) THEN 1088 

1060 NEXT : HOME ; VTAB 12: PRINT ' NESSUN FILE CON QUESTO NOME"; PRINT ; PRINT 
' VUOI RIPROVARE (S/N) INPUT YN$; IF LEFTi (YN$,1) = 'S' THEN FL = 

1; GOTO 1010 
1070 RETURN 
1088 GOSUB 9000 
1098 POKE 35 21 

1180 HOME ; OtaB 22: INJERSE ; PRINT '-VTAB 

23: PRINT ' SPEED= 118; NORfWL 

1110 POKE 232,3 

1120 FOR I = I TO MC - 1;A$ = ME$(I) 

1130 INVERSE ; VTAB 23: PRINT ' MESSAGGIO-N.'!;; HTAB 16; PRINT 'DATA IF 
M0$(I) = ” THEN PRINT ' ';; GÈTO 1160 

1140 IF LEN (MOKI)) < 8 THEN MD$(I) = ' ' ♦ MOKI): GOTO 1140 

1150 HTAB 31 - LEN (MD$(I)); PRINT MD$(I); 

1160 NOR^L 
1170 LM = 2;RM = 32 

1180 FOR J = 0 TO 8; VTAB PEEK (232) ♦ J: HTAB 1; CALL - 868; FOR L = 1 TO 
100: NEXT ; NEXT ; VTAB PEEK (232) 

1190 GOSUB 18888 

1280 IF PEEK (232) = 3 THEN POKE 232,12: GOTO 1220 
1210 IF PEEK (232) = 12 THEN POKE 232,3 
1220 NE)a 

1230 FOR I = 1 TO 3008: NE)a 

1240 FOR I = 21 TO 2 STEP - 1: (/TAB 1: HTAB 1: CALL - 848: FOR J = 1 TO 1 

00: NE)a : NEXT 
1230 GOTO 1100 

2000 REM :::A8GIUNTA AL FILE::: „„„„ „„„ 

2010 HOME : (/TAB 12: PRINT ■ NOME DEL FILE :'j: FOR I = 1 TO 18: 

(95)|: NEXT : PRINT : VTAB 12: HTAB 17: INPUT ■■jA$: IF A* = THEN RETURN 

2020 IF LEN <A$) ) 10 THEN 2000 
2830 IF FL = 1 THBl FL = 0: GOTO 2850 
2048 GOSUB 15808 

2058 FOR I = 1 TO CO - 1: IF A$ = TI»(I) THEN 2080 

2040 NEXT : HOME : VTAB 12: PRINT * NESSUN FILE CON QUESTO NOME*: PRINT : PRINT 
• VUOI RIPROVARE (S/N) *;: INPUT YN»: IF LEn$ (YN$,1) = ’S* THEN FL = 

1 : GOTO 2000 
2070 RETURN 

2080 AD = 1 ; HOME : GOSUB 3090 

2090 PRINT : PRINT * CORRE2IONI (S/N) ’j: INPUT YN$: IF LEFT< (YN$,1) = ’S 
' THB^ 2880 

2100 PRINT CHR$ (4)*APPEN0 'A*: PRINT CHR$ (4)*URITE ■A$: PRINT ME»(MC): PRINT 
MM(MC): PRINT CHR» (4)*CL0SE* 


30 



2118 PRINT ; PRIflT * UN ALTRO MESSAGGIO (S/N)';; INPUT YN$: IF LEFTI (YN$, 

1) = "N* THEN AD = 0; RETURN 
2120 HOME ; GOSUB 3898: GOTO 2090 
3008 REM !;!CREAZIQNE FILE;:: 

3018 GOSUB 15000: REM LEGGE IL NOME DEL FILE 
3020 HOME 

3038 ^AB 3: PRINT • NOME DEL FILE FOR I = 1 TO 18: PRINT CHR$ (95):: 

NE)(T : PRINT ; UTAB 3: HTAB 17: INPUT ";TI$(CO + 1): IF LEN (TI$(CÓ + 

D) ) 10 THEN HOME : GOTO 3030 
3040 IF TU(CO +!) = "• THEN 3170 
3050 MC = 1 

3060 IF CO = 0 THEN 3890 

3070 FOR I = 1 TO CO: IF TI$(CO + 1) = TI$<I) THEN HOME : VTAB 12:A$ = "ES 
ISTE GIÀ' UN TITOLO CON QUEL NOME'; GOSUB 11000; FOR I = 1 TO 3800: HBd 
; GOTO 3028 
3080 HBG 

3090 IflJERSE ; VTAB 5; HTAB 2: PRINT 'INSERISCI IL MESSAGGIO NORfV^L : PRINT 
; FOR I = 1 TO 224: PRINT CHR$ (95);; HW : PRINT : (/TAB 7; HTAB 1: GOSUB 
8008;ME$(MC) = ST$ 

3100 VTAB 15: PRINT ' DATA (GG/rt1/#V^) FOR I = 1 TO 8; PRINT CHR$ (95) 

;: NE)(T ; PRINT ; UTAB 15; HTAB 19: INPUT "|MW(MC) 

3120 IF AD = 1 THEN RETURN 

3130 PRINT : INPUT ' CORREZIONI (S/N) ?';YN$: IF LER$ (YN$,1) = 'S' THEN 
HOME : GOTO 3090 

3140 PRINT : PRINT ' UN ALTRO MESSAGGIO (S>^)':; INPUT ";YN$; IF LEFT$ (Y 
N$.l) = 'S' THEN MC = MC ♦ 1: HOME : GOTO 3890 
3158 PRINT CHR$ (4)'OPEN 'TI$(£0 ♦ 1): PRINT CHR$ (4)'URITE 'TI$(CO ♦ 1); 

FOR I = 1 TO MC; PRINT ME$(I): PRINT MD$(I); HBH ; PRINT CHR$ (4)'CL 
OSE' 

3160 PRINT CHR$ (4)'0PEN TITLES': PRINT CHRI (4)'P0SITI0N TITLES.R'CO - 1 
: PRINT CHR$ (4)'URITE TITLES'; PRINT TI$(CO ♦ 1); PRINT PRINT 
Zm (4)'CL0SE' 

3170 RETURN 

4088 REM :::C^BIA UN FILE::: 

4010 HOME : VTAB 12; PRINT ' NOME DEL FILE FOR I = 1 TO 10: PRINT CHR$ 
(95);; NEXT ; PRINT ; UTAB 12: HTAB 17; INPUT ";A$: IF A$ = " THEN RETURN 

4028 IF LEN (A$) > 10 THEN 4008 
4030 IF FL = 1 THEN FL = 0; GOTO 4060 
4040 GOSUB 15000 
4850 FU = A$ 

4060 FOR I = 1 TO CO - 1; IF A$ = TU(I) THEN 4098 

4078 NE)a ; HOME ; UTAB 12: PRINT ' NESSUN FILE CON QUESTO NOME': PRINT : PRINT 
• PROVI ANCORA (S/N) ';: INPUT YN$: IF LER< (YN$,1)^ 'S' THEN FL = 1 
; GOTO 4000 
4888 RETURN 
4098 GOSUB 9880 

4100 FOR I = 1 TO MC - 1;A$ = NE$(I) 

4110 HOME ; VTAB 3; PRINT ' MESSAGGIO N. PRINT ;LM = 2;RM = 32: GOSUB 
10000; PRINT ; PRINT ' DATA ;'MD$(I) 

4115 VTAB 17 

4120 PRINT • DV1BIO/MOOIFICA 

(D) ATA (M)ESSAGGIO 

(E) LIMirW (P)ROSEBUI 

QUALE—)': VTAB 22; HTAB 11; GET YN$; PRINT YN$ 

4130 IF YN$ = 'P“ THEN 4180 
4148 CH = 1 

4158 IF YNI = '0' THEN 4260 
4168 IF YN$ = 'E' THEN 4338 
4170 IF YN$ = 'M' THEN 4290 
4180 IF MC = 1 THEN 4218 
4198 IF I ) = MC - 1 THEN 4210 
4208 HW 

4210 A$ = FU; IF CH = 0 THEN 4240 

4220 PRINT CHR$ (4)'DELETE 'A$; PRINT CHR$ (4)''0PEN 'A$; PRINT CHR$ (4)' 

URITE 'A$ 

4238 FOR I = 1 TO MC - 1; PRINT ME$(I): PRINT M[)$(I); NEXT ; PRINT CHR$ (4 
)'CLQSE' 

4240 15: CALL - 958; PRINT ' VUOI C^BIARE UN ALTRO FILE';; INPUT YN$ 

; IF LERI (YN$,1) = 'S' THEN HOME :CH = 0: GOTO 4000 
4250 RETURN 

4268 VTAB 15; CALL - 958: PRINT ' DATA (G6/m/^) ;':; FOR J = 1 TO 8: PRINT 
CHR$ (95);; NEXT : VTAB 15; HTAB 19; INPUT ";MD4(I) 

4278 IF LEN (MD$(I)) ) 8 THEN VTAB 7: CALL - 958: GOTO 4268 
4280 A$ = ME$(I): GOTO 4110 

4290 VTAB 13: CALL - 958; PRINT ' MESSAGGIO :'; VTAB 15: FOR J = 1 TO 224: 

PRINT CHR$ (95);; NEXT ; VTAB 15; GOSUB 8080 
4300 IF LEN (SU) = 1 THEN M = ME$(I); GOTO 4328 
4310 ME$(I) = ST$:AÌ = ST$ 

4320 GOTO 4110 

4330 VTAB 17; CALL - 958; PRINT ' CONFERMI (S/N) ?';: INPUT ";YNI; IF YN$ 

< > 'S' THEN 4110 



GETLN del monitor, situata a $FD6A 
(-662). Non appena viene introdotto 
un ritorno carrello la subroutine 
GETLN termina e l’esecuzione del 
programma torna alla linea 8020 del 
BASIC. 

A questo punto viene letta con 
PEEK ogni locazione di memoria, con 
l’impiego di un loop, per vedere quale 
valore di carattere contenga. Se il va¬ 
lore della locazione di memoria non è 
uguale a 141, un ritorno carrello, il suo 
equivalente di carattere è aggiunto a 
ST$. Se si incontra un ritorno carrello 
si esce dal loop e l’esecuzione del pro¬ 
gramma restituisce il modulo di ag¬ 
giunta di linea 3090, dove ME$(MC) è 
reso equivalente a ST$. 

Per ultima verrà chiesta una data, 
nella forma GG/MM/AA (giorno, me¬ 
se, anno): si tratta di una voce facolta¬ 
tiva, che può essere omessa introdu¬ 
cendo un ritorno carrello. Una volta 
introdotti tutti i dati verrà chiesto al¬ 
l’utente di verificare i dati che ha forni¬ 
to. Il sistema è predisposto per gestire 
un massimo di 100 messaggi. Esiste 
però la possibilità di aumentare questo 
numero, cambiando le istruzioni DIM 
a linea 120. 

L’aggiunta 
a un file esistente 

Se diventa necessario aggiungere 
altri messaggi a un file esistente, oc¬ 
corre fare l’opzione 2 del menù princi¬ 
pale. Verranno chiesti nell’ordine, il 
file cui accedere, il nuovo messaggio e 
la data. Una volta introdotti tutti i dati 
il nuovo messaggio sarà aggiunto alla 
fine del file. Dato che Messaggio usa 
file sequenziali, questa aggiunta è sta¬ 
ta fatta con l’impiego del comando 
DOS “APPEND”. Se si sta ancora 
usando il DOS 3.2 o 3.2.1 c’è nel co¬ 
mando APPEND un errore che po¬ 
trebbe causare qualche problema. Per 
porre rimedio a questa difficoltà nei 
sistemi DOS 3.2 occorre apportare 
questi cambiamenti: 
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(AGGIUNGERE) 

105 POKE 778,168: POKE 779,0: 

POKE 780,32: POKE 781,237: 

POKE 782,253 

(CAMBIARE) 

2100 PRINT CHR$ (4)“APPEND ”A$: 

PRINT CHR$ (4)“WRITE ”A$; 

PRINT ME$(MC): PRINT MD$(MC): 

CALL 778: PRINT; 

PRINT CHR$ (4)“CLOSE” 

Questo accorgimento dovrebbe ov¬ 
viare a qualsiasi problema. 

Modifica di un fiie 

Per modificare un file esistente si 
ricorre all’opzione 4 del menù del pro¬ 
gramma (verrà chiesto quale file si 
vuol cambiare). Quando si è fatta que¬ 
sta scelta una routine modificata (“Im¬ 
mettere qualsiasi cosa”, linee 9000- 
9120) leggerà il file sul dischetto. Una 
volta che tutti i messaggi saranno stati 
letti in memoria, ognuno di essi verrà 
visualizzato sullo schermo. Si può sce¬ 
gliere se modificare il messaggio, la¬ 
sciarlo immutato o eliminarlo dal file. 
Quando sono stati fatti tutti i cambia¬ 
menti dei messaggi il file verrà riscrit¬ 
to, in forma corretta, sul dischetto. 

Cancella/Visualizza 

L’opzione 5 permette di cancellare 
qualsiasi file dal dischetto. Viene chie¬ 
sto il nome del file da cancellare e, se il 
nome introdotto è quello di un file 
esistente, si dovrà confermare la deci¬ 
sione di cancellare il file introducendo 
“DEL”. Se a questo punto viene data 
una risposta inesatta si verrà fatti tor¬ 
nare al menù del programma. 

L’opzione 6 visualizza tutti i file di 
messaggi memorizzati nel file di testo 
TITOLI fino a 38 titoli (2 colonne di 19 
nomi) alla volta. 

Messaggi 

Quando si fa l’opzione 1 e si sceglie 
il file da visualizzare viene messa all’o¬ 
pera una delle routine più forti del 
programma, quella di formattazione 
della stampa. Questa routine elimine¬ 
rà, se usata correttamente, le famige¬ 
rate parole spezzate che si insinuano 
tanto spesso nelle sezioni di testo dei 
programmi. Occorre impostare due 
variabili prima di accedere alla routine 
di formattazione; si tratta di LM (mar¬ 
gine sinistro) e RM (margine destro). 
RM deve essere fissata uguale alla lar¬ 
ghezza dello schermo; in questo pro¬ 
gramma il valore è 32. Ecco il funzio¬ 
namento della routine: 

10010 Controlla se A$ sia inferiore 
alla larghezza dello schermo; in caso 


4348 

4358 

4368 

4378 

4388 

4398 

4488 

5888 

5818 


5828 

5838 

5848 

5858 

5868 

5878 


5888 

5898 

5895 

5188 

5118 


5148 

5158 

5168 

6888 

6818 

6828 

6838 

6848 

6858 

6868 

6878 

6888 

6898 

6188 

6118 

6128 

6138 

6148 


IF I = fiC THEN MC = MC - 1: GOTO 4288 
FOR J = I IO MC - 1 

ME$(J) = ME$(J + 1);M{)$(J) = MW(J + 1): NEXT 
MC = MC ‘ 1 
A$ = miì) 

IF I > = MC THEN 4188 
GOTO 4118 

REM ::: C^CELLA FILE:;; 

HOME ! VTAB 12: PRINT - INSERISCI IL FILE DA CANCELLARE' : PRINT ; HTAB 
18; FOR I = 1 TO 18; PRINT CHR$ (95);; NEXT ; PRINT ; 9TAB 14; HTAB 18 
; INPUT ";A$ 

IF Al = THEN RETURN 
IF LEN (Al) ) 18 THEN 5818 

RDQIIR ISftflf) 

FOR I = 1 TO CO - 1: IF A$ = TI*<I) THEN 60T0 5898 
NEXT 

HOME : VTAB 12: PRINT • NESSUN FILE CON QUESTO NOME': PRINT : PRINT ' 

VUOI RIPROVARE (S/N) INPUT ••jYN$: IF LEn< <YN*,1) = 'S* THOd 58 

^RETURN 

PRINT ; PRINT ' 'jAI;' UERRA' C^VICELLATO' 

PRINT ; PRINT ' CONFERMI (S./N) '; HTAB 16; VTAB 18; INPUT YNI; IF YNI < 

) 'S' THEN RETURN 

HOME : 9TAB 12: HTAB 5; IWERSE ; PRINT ' STO (>¥^CELL/V4D0 IL FILE'; NORfi^L 

IF I = CO - 1 AND I = 1 THEN PRINT CHRI (4)'DELETE TITLES'; PRINT CHRI 
(4)’DELETE 'Al: RETURN 

FOR J = I TO CO - 1:TII(J) = TIKJ i 1); NEXT 

PRINT CHRI (4)'DELETE TITLES'; PRINT CHRI (4)'OPEN TITLES'; PRINT CHRI 
(4) 'URITE TITLES'; FOR I = 1 TO CO - 1; PRINT TIKI); NEXT ; PRINT CHRI 
(4)'CL0SE' 

PRINT CHRI (4)'DELETE 'Al 

PRINT : PRINT ' FATTO.': PRINT 'VUOI OV^CELLARNE UN ALTRO (S/N)? '; 

; INPUT ";YNI; IF LEFTI (YNI,1) = 'S' THEN 5888 
RETURN 

REM :;;GURDA NOMI;;; 

60SUB 15888 • 

B = 1 : HOME 
FOR I = B TO CO - 1 
IF I < 18 THEN HTAB 2 

IF PEEK (37) < 22 THEN PRINT I'. 'TII(I): GOTO 6870 

GOTO 6898 

NEXT 

GET Al; PRINT Al; RETURN 
J = I;I = CO - 1: IF J = I THEN 6158 
VTAB 2 

FOR I = J TO CO - 1 

HTAB 16; IF PEEK (37) ( 22 THEN PRINT I'. 'TII(I); GOTO 6148 
GOTO 6158 

NEXT ; HTAB 16; GET Al; PRINT Al; RETURN 



Figura 1. Un esempio di messaggio memorizzato con il programma pubblicato in 
queste pagine. 
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Ò150 ffTAB 16: GET A$; PRINT A$ 

6160 B = 1:1 = CO - I; IF B = I THEN 6140 

6170 HOME ; GOTO 6030 

7000 TEXT : HOME : END 

8000 REM ;::INPUT ROUTINE;;; 

8010 ST$ = -•; CALI - 662 

8020 FOR J = 512 TO 736:X = PEEK (J) 

8030 IF X = 141 THEN 8060 
8040 ST$ = ST$ + CHR$ (X * 128) 

8050 NEXT : IF LEN (Sf$) > 224 THEN PRINT : PRINT CHR$ (7)" TROPPO LUNGO 
FOR J = 1 TO 3000; NEXT ; HOME : POP ; GOTO 3070 

8060 IF ST$ = •' THEN POP ; HOME ; GOTO 3070 

8070 RETURN 

9000 REM ;;;LEGGE I MESSAGGI;:; 

9010 MC = 1 

9020 PRINT CHR$ (4)'0PEN 'A^; PRINT CHRI (4)'R£AD 'Al 
9030 ST$ = •■ 

9040 CALI - 662 

9050 FOR I = 512 TO 736:X = PEEK (I); IF X = 141 THEN 9090 
9060 IF X > 141 THEN X = X - 128 
9870 ST$ = ST$ ♦ CHR$ <X) 

9080 NE)(T 

9890 ME$(MC) = ST$: INPUT M!)$<MC):MC = MC 4 1 

9100 GOTO 9830 

9110 PRINT CHR$ (4)'CL0SE' 

9128 RETURN 

10800 REM ;;; FORfWHAZIONE ST^PA:;; 

18810 IF LEN <A$) < = RM - LM THEN PRINT A$; RETURN 

10820 FOR J = RM - LM TO 1 STEP - 1 

10830 C$ = MIDI <A$,J,1); IF C$ = ' ' OR C$ = ' OR C$ = OR C$ = "!" OR 
C$ = "?- OR Ci = *-• THEN 18050 
10040 NEXT ;J = RM - LM 

10050 IF Ci = • ■ THEN Ali = LEFTi (AÌ,J - 1):AÌ = RIGHTi (Ai, LEN (Ai) - 
J): GOTO 10090 

10060 IF Ci = "!" OR Ci = OR Ci = OR Ci = “?' OR Ci = J = R 

M - LM TH0< GOSUB 10130:A1Ì = LERi (AÌ,J);AÌ = RIGHTi (Ai, LEN (Ai) 

- J - 1); HTAB LM; PRINT Ali: GOTO 10108 
18070 Ali = LERi (AÌ,J); IF LEN (Ai) < > LEN (Ali) THEN Ai = RIGHTi (A 
i, LEN (Ai) - J): GOTO 18098 
10080 GOTO 10110 
10898 HTAB LM: PRINT Ali 
18108 IF LEN (Ai) > RM - LM THEN 10020 
10118 HTAB LM: PRINT Ai 
10120 RRURN 

10130 IF J = LEN (Ai) THEN RRURN 

10140 IF MIDi (AÌ,J 4 1,1) < ) ■ " THEN Ali = LERi (AÌ,J):AÌ = RIGHTi 
(Ai, LEN (Ai) - J); HTAB LM: PRINT Ali;: POP : GOTO 10180 
10150 RRURN 

11000 PRINT TAB( ((31) - LEN (Ai)) / 2)AÌ; RRURN 
12080 DATA "1. DISPLAY FILE"," 2. AGGIUNTA A UN FILE'," 3. CREAZ 
IONE FILE"," 4. C^BIO^OOIFICA',* 5. CANCELLAZIONE FILE*,'6. EL 
ENCO FILE*,' 7. FINE PROGimW' 

15000 REM LEGGE FILE DEI TITOLI:;: 

15010 CO = 1 

15020 PRINT CHRi (4)'OPEN TITLES': PRINT CHRi (4)‘REA0 TITLES’ 

15830 INPUT TIÌ(CO); IF TIÌ(CO) = THEN 15058 
15840 CO = CO 4 1: GOTO 15838 
15050 PRINT CHRi (4)'CL0SE' 

15060 RRURN 

32800 REM :::ROUTINE DI ERRORE::: 

32010 ER = PEEK (222):EL = PEEK (218) 4 PEEK (219) « 256 
32020 CALL 768 

32830 IF ER = 5 FWD EL = 15830 iWD A < > 3 THEN PRINT : PRINT CHRi (4)'C 
LOSE“; HOME ; VTAB 12;AÌ = ' NESSUN FILE CON QUESTO NOME'; GOSUB 11000: 
FOR I = 1 TO 4000: NEXT ; POP ; RRURN 
32040 IF ER = 5 ^D EL = 15038 THEN PRINT : PRINT CHRi (4)'CL0SE“;ER = 1; 
GOTO 15860 

32050 IF ER = 5 ^D EL = 9040 OR EL = 9100 THEN PRUfT ; GOTO 9110 
32060 IF ER = 22 /V^D EL > 18000 THEN RÉSUMÉ 

32070 IF ER = 255 THEN SPEED= 255; GOTO 130 

32080 HOME 

32090 IF ER = 9 THEN PRINT 'DISCO PIENO!': END 

32100 IF ER = 10 THEN PRINT 'FILE LOCKED!'; END 

32110 IF ER = 8 THEN PRINT 'DISK I/O ERROR"; END 

32120 IF ER = 4 THEN PRINT 'TOGLIERE LA LINGUETTA DI PROTEZIONE": END 



affermativo stampa A$ e ritorna. 

10020 Predispone il loop discenden¬ 
te, lunghezza massima a 1. 

10030 Fissa C$ uguale all’elemento 
j di A$ e controlla se ci sia interpun¬ 
zione o uno spazio. Se C$ è uno spazio 
0 un segno d’interpunzione esce dal 
loop andando a linea 10050. 

10040 Decrementa il contatore con 
il comando NEXT. 

10050 Se C$ è uno spazio, lo elimina 
e fissa Al$ = LEFT$(A$,J -1) e A$ = 
al resto dell’AS originale. Va alla rou¬ 
tine di stampa. 

10060 Se C$ è un segno d’interpun¬ 
zione ed è nella posizione massima 
(RM - LM = J) va a controllare il 
carattere seguente (10130). Se il carat¬ 
tere seguente è uno spazio fissa Al$ = 
LEFT$(A$,J) e A$ = al resto dell’AS 
originale meno un carattere. Stampa 
Al$ e va a 10100. 

10070 Non si incontrano spazi o se¬ 
gni d’interpunzione. La riga viene 
spezzata alla lunghezza massima. 

10080 Se non viene incontrato alcu¬ 
ne segno d’interpunzione o spazio e 
non c’è più stringa da controllare. Va 
alla routine di stampa finale a 10110. 

10090 Stampa Al$ quando non vie¬ 
ne trovato alcuno spazio o segno d’in¬ 
terpunzione. 

10100 Controlla se ci sia altro di A$ 
da formattare. In caso affermativo va 
all’inizio di un nuovo loop a linea 
10020. 

10110 Formattazione completa. 
Stampa A$ a HTAB LM. 

10120 Salta fuori dalla subroutine; il 
compito è assolto. 

10130 Parte della routine per il con¬ 
trollo del tipo di carattere che segue un 
segno d’interpunzione. Se la restante 
parte di A$ è più corta della larghezza 
dello schermo o uguale a essa non oc¬ 
corre alcun controllo. Torna alla routi¬ 
ne di stampa a linea 10060. 

10140 Se il carattere seguente non è 
uno spazio fissa Al$ = LEFT$(A$,J) 
e A$ = al resto dell’AS originale. 
Stampa Al$ ma tiene il cursore sulla 
stessa riga per evitare l’interlinea au¬ 


tomatica a fine riga. Salta fuori dalla 
subroutine e vede se ci sia altro da 
formattare. 

10150 II carattere seguente è uno 
spazio, così ritorna a 10060. 

Viene letto in memoria l’intero file 


scelto dall’utente, e quindi ci sarà ac¬ 
cesso al dischetto solo all’inizio della 
routine. I messaggi scelti per la visua¬ 
lizzazione gireranno finché un Con- 
trol-C riporterà l’utente al menù del 
programma. 


® 1984 by Nibble e Applicando 
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Si perché sfai per volare in California! Il biglietto de hai trovato fra le pagine di Applicando può 
essere quello vincente. Se lo è, ti aspetta un fantastico viaggio di otto giorni in California, passando 
per New York. Certo, come rinundare a respirare l'aria della grande mela, "The Big Apple"? New 
York, sintesi di tutta l'America, con le imponenti architetture di Manhattan e gli affari frenetici di Wall 
Street, oppure la natura e il silenzio di Central Park; le lud e i colori dello "dow business" di Broad- 
way, 0 la spontaneità di artisti che improvvisano dietro l'angolo: un violinista, un mimo, un acrobata. 
Poi prima che il cuore scoppi d'amore per New York, via, in volo verso l'altra costa: San Francisco, 
giusto in tempo per gustare un romantico tramonto nella baia attraversata dal Golden Gate. E poi 
su e giù per le discese mozzafiato percorse dai tram: e perché non provare il "cable car", il tram che 

viene trainato da un cavo attraverso la città, già dal secolo 
scorso? A Prisco si gira anche coi pattini ® d ride e si can¬ 
ta perle strade, perché Prisco è la città più simpatica di 
tutti gli States. Non lasdarti stregare, però, da San Fran¬ 
cisco, perdié la prossima tappa è veramente speciale: 
Cupertino. Si Cupertino, nella ormai mitica Silicon Vol¬ 
ley, la favolosa valle dove nasce la sofisticata tecnolo¬ 
gia Apple. Tutto è cominciato nel 1977in un garage, 
dove oteve Jobs ideò il primo personal computer, oili- 
con Volley continua a non essere segnata sul¬ 
l'Atlante, eppure sta segnando il corso dello svi¬ 
luppo tecnologico di questo secolo. A Cu- 
portino sarai accolto dallo staff Apple; 
___ potrai visitare gli stabilimenti dove pren¬ 

dono forma i personal computer Apple: vivrai una giornata da 
fantascienza! E se il tuo biglietto non è quello fortunato? Niente paura: infatti potrai partecipare al¬ 
l'estrazione di un Apple Ile, il nuovo personal completo, compatto con grafica ad altissima risoluzione. 
Leggi all'interno del biglietto le norme per partecipare a questo concorso e poi... vola in Californial 
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LA LIGHT PEN IL SISTEMA PIU' 
NATURALE PER DISEGNARE 
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DEL TUO COMPUTER 


La Gibson è la Light Pen più potente e completa per Apple. 

Sino dalla sua apparizione sul mercato USA La Gibson Light Pen 
diventata un immediato successo. Lo stesso Steve Woznyalc, uno 
dei fondatori della Apple, è stato uno dei primi entusiasti 
utilizzatori della Gibson Light Pen che ha definito come il più 
significativo miglioramento dell'interazione 
uomo/computer disponibile su Apple. Oggi la 
KOALA TECHNOLOGIES forte dell'enorme 
successo conseguito con la KOALA PAD e con la 
esperienza notevole acquisita nel campo della 
grafica per computer ripresenta la GIBSON 
UGHI PEN in una versione ancora più potente ec 
ottimizzata per 5 diversi applicazioni: 


REGIONNL SRLES PROFILE 


Pen Pointer per disegnare 

Pen Designer per progettare 

Pen Animotor per costruire animazioni 

Pen Musicion per comporre musica 

Pen Trock per creare programmi supportanti 

la Light Pen 




COMPUTER GRAPHICS DIVISION 

MILANO: Via L. da Vinci, 43 - 20090 Trezzano S/N 
Tel. 02/4455741/2/3/4/5 - Tlx: TELINT1312827 
ROMA: Via Salaria, 1319 - 00138 Roma 
Tel. 06/6917058-6919312 - Tlx: TINTRO1614381 
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Servizio a cura di Mauro Gandini e Francesca Marzotto 
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Chi vuol esser 
mela sia... 


MISSONI 

“Chi vuole può 
mettersi ia maglia 
sui jeans, una cami¬ 
cia su un paio di pan¬ 
taloni di qualcuno 
che non siamo noi, e 
via dicendo”. 


>..e chi ancora non lo è legga 
l’esperienza di questi nove testimoni: 
dallo stilista Missoni ai dentista 
Fanciulli, dalla pubblicitaria Ghilardi 
al fotografo Fiorenti. E si affretti: con 
un Apple del doman c’è più certezza. 


Ottavio Missoni, Tai per 
gli amici, 63 anni, è senz’al¬ 
tro uno dei personaggi più 
geniali e curiosi del mondo 
della moda. Un mondo, tra 
l’altro, dove sembra capita¬ 
to per caso e dal quale, in 
qualche modo, pare lonta¬ 
nissimo, pur avendone rag¬ 
giunto i massimi vertici. 

I suoi celebri maglioni. 
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presentati alle sfilate con ac¬ 
costamenti raffinati, ognu¬ 
no è libero di indossarli co¬ 
me vuole, in una sorta di di¬ 
sordine che fa scoprire a chi 
deve cimentarsi in questo 
compito il piacere di inven¬ 
tare e di sentirsi a sua volta 
creatore di una propria mo¬ 
da, coloratissima e persona¬ 
le. “Ognuno dei nostri ca- 
pi“, dice Missoni, “non è le¬ 
gato agli altri, anche se, per 
ovvi motivi, alle sfilate li 
presentiamo in un certo mo¬ 
do. Ma chi vuole può met¬ 
tersi la maglia sui jeans, una 
camicia su un paio di panta¬ 
loni di qualcuno che non sia¬ 
mo noi, e via dicendo. E’ un 
finto disordine in cui lascia¬ 
mo spazio a chi deve indos¬ 
sare e gli facciamo pensare 
da solo come vestirsi”. 

Insomma, strumenti di 
abbigliamento, non ferrei 
dettami. E poi libertà, fan¬ 
tasia, estro di chi indossa, 
che si sposa con l’estro di chi 
ha creato i capi. Come col 
computer: rigido apparente¬ 
mente, rigoroso, logico. E 
invece apertissimo agli in¬ 
terventi creativi, limitato so¬ 
lo dall’inventiva di chi lo 
usa. 

Che Missoni sulla sua 
strada a un certo punto si 
imbatta in un Apple non 
sorprende: il personaggio è 
pieno di idee e disponibile 
alle novità. E qui è la chiave 
vera dei risultati che è riusci¬ 
to a ottenere. Ma incuriosi¬ 
sce. Chi si aspettava che a 
mescolare i colori, a predi¬ 
sporre i disegni, fosse un 
elaboratore? 

“Non esageriamo però”, 
dice Ottavio Missoni. “Me¬ 
scola sì, combina i colori, 
aiuta nei disegni: aiuta, ma 
non crea. La differenza vera 
sta nel fatto che disegnare 
con la matita richiede più 
tempo. E poi occorre trasfe¬ 
rire dalla carta alla realtà dei 
filati. Invece disegnare sul 
video, con i programmi che 
abbiamo, è immediato: poi 
si guarda, si controllano i co¬ 
lori, si modificano, si deci¬ 
de. E a questo punto il gros¬ 
so è fatto: all’Apple II di 
mio figlio Luca è collegata 
una macchinetta che perfora 



Nella pagina precedente: Ot¬ 
tavio Missoni con la moglie e 
il figlio nel suo atelier. Qui so¬ 
pra: alcuni esempi delle fa¬ 
mose creazioni dello stilista 
milanese, effettuate serven¬ 
dosi dell’Apple. 

automaticamente un nastro 
di carta. Basta infilare que¬ 
sto nastro nelle macchine da 
maglieria Stoll...” 

Luca Missoni è un ragaz¬ 
zo giovane, simpatico. Del 
padre ha l’entusiasmo, e la 
creatività, della madre la co¬ 
stanza e la forza di volontà. 


Airinizio quasi non era 
nemmeno consapevole che 
quello che era arrivato in 
fabbrica era un computer: in 
pratica ai Missoni era stato 
venduto quasi come un ac¬ 
cessorio delle macchine per 
maglieria. “Per vedere i co¬ 
lori si fa così”, avevano spie¬ 
gato i tecnici tedeschi della 
Stoll, “e per ottenere un ma¬ 
glione finito si fa così e co¬ 
sì”. 

Che quella tastiera gialla 
con sopra il monitor fosse un 
Apple, capace di fare anche 
tant’altre cose, Luca lo ha 
capito da solo. E ha comin¬ 
ciato a modificare i pro¬ 
grammi, fino ad ottenere ve¬ 
ramente i risultati che inte¬ 
ressano in casa Missoni. Poi, 
visto che c’era, ha provato 
anche qualche altro pro¬ 
gramma, e oggi il suo labo¬ 
ratorio, quando non è impe¬ 
gnato a realizzare nuovi mo¬ 
delli, è diventato un piccolo 
club di applisti. 


BOSSI 

“Un’espansione di 
memoria presto, e, 
più avanti, magari ii 
modem...” 

C’è un orgoglio quasi pa¬ 
terno nella voce del gioiel¬ 
liere Franco Bossi, quando 
parla dei suoi due personal 
computer. Dal giorno in cui 
hanno fatto la loro appari¬ 
zione nel negozio del padre 
Armando molte cose sono 
cambiate. “Come è successo 
quando è arrivato lui”, sor¬ 
ride indicando il suo splen¬ 
dido cane lupo: “non c’è più 
stato spazio per niente altro, 
non c’è più stato tempo libe¬ 
ro”. 

Da vero amatore, infatti. 
Franco Bossi ha deciso fin 
daH’inizio di realizzare per¬ 
sonalmente alcuni program¬ 
mi necessari alla gestione 
del negozio: non solo per ot- 
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timizzare le prestazioni del 
computer, ma anche perché 
“vederli funzionare è davve¬ 
ro una soddisfazione”. Tan¬ 
to più che, con i suoi pro¬ 
grammi, non si limita a tene¬ 
re la contabilità, ma riesce 
ad avere sotto controllo l’in¬ 
tera attività del negozio: i 
rapporti con fornitori e 
clienti, la gestione del ma¬ 
gazzino, l’archivio delle 
operazioni commerciali, la 
programmazione degli inve¬ 
stimenti. 

La gioielleria di Città Stu¬ 
di, a Milano, è simile a tante 
altre: calda e raccolta, piena 
di cose belle, l’atmosfera 
ammiccante e severa insie¬ 
me che sempre i gioielli 
emanano; il piano superio¬ 
re, privato, è l’ufficio-labo- 
ratorio: accanto al calibro e 
al microscopio troneggiano 
un Apple //e e la stampante; 
c’è anche la collezione di pi¬ 
pe di Armando Bossi, c’è 
i’immancabile bilancia, e 
un’infinità di dischetti. “Ne 
ho ormai un centinaio, di cui 
però quasi la metà non viene 

A sinistra: ii gioieiiiere Fran¬ 
co Bossi e, sotto, l’eiettrici- 
sta Giuseppe Sommacal. 


mai utilizzata, perché è stata 
sostituita da software più ag¬ 
giornato; anche i program¬ 
mi da me realizzati ne hanno 
soppiantati alcuni. Conti¬ 
nuo però ad acquistarne di 
nuovi: la grande disponibili¬ 
tà di software sul mercato è 
stata anzi la principale ra¬ 
gione per cui ho scelto i 
computer Apple”. 

Oltre al //e, infatti, c’è an¬ 
che un Apple //c, saggia¬ 
mente installato nell’abita¬ 
zione poco lontana: “Ho bi¬ 
sogno di molta tranquillità, 
a volte, per preparare un 
programma, e preferisco 
farlo a casa; poi qui, sul //e, 
spesso lavora anche mio pa¬ 
dre; forse, in futuro, pure 
mia madre vincerà le sue 
perplessità...” Che non le 
abbia ancora vinte è strano, 
perché basta guardarsi at¬ 
torno per notare l’assenza di 
schedari, di registri, di pile 
di carte; basta il Data Base, 
infatti, per gestire una con¬ 
tabilità semplificata, e sono 
sufficienti pochi minuti al 
giorno per memorizzare i 
nomi dei clienti visti, gli ac¬ 
quisti fatti, il materiale con¬ 
segnato. 

“Ma non si tratta solo di 



risparmiare tempo e spazio; 
l’uso del personal computer 
ci ha fatto fare anche un sal¬ 
to qualitativo: mettiamo in 
memoria tutte le nostre atti¬ 
vità, e i nostri clienti sono 
così certi di poter discutere 
con noi senza equivoci gli 
eventuali problemi. Se un 
orologio funziona male, per 
esempio, in pochi secondi 
possiamo scoprire se è già 
stato riparato da noi, per 
quale difetto, quando, e così 
via. Il cliente apprezza sem¬ 
pre la precisione e la corret¬ 
tezza”. 

Entusiasmo su tutta la li¬ 
nea, dunque. Quella di ge¬ 
stire con il personal compu¬ 
ter un’attività di commercio 
al dettaglio è un’idea un po’ 
avanguardista ma tutt’altro 
che azzardata. “Lavoriamo 
in questo modo ormai da 
mesi, e prima di tirare un 
bilancio sull’utilità del per¬ 
sonal computer voglio che 
passi un anno intero; co¬ 
munque, già ora siamo entu¬ 
siasti. Altri commercianti 
che hanno fatto il nostro 
stesso esperimento lo sono 
altrettanto; soprattutto chi 
ha da gestire un magazzino 
di generi voluttuari trae un 
sostanziale beneficio dal 
personal computer. Certo, 
tutto è perfettibile, e anch’io 
devo migliorare la mia po¬ 
stazione: un’espansione di 
memoria presto, e, più 
avanti, magari il 
modem...”. 


SOMMACAL 

^‘Software in italia- 
no praticamente 
non esiste. Anzi, è 
ora che si cominci 
seriamente a pro¬ 
durne!” 

Professione: elettricista. 
Attrezzi del mestiere: fili, 
lampade, forbici, nastro iso¬ 
lante... e un personal com¬ 
puter corredato da una col¬ 
lezione di programmi tra le 
più ricche. “Il mio lavoro”, 
spiega Giuseppe Sommacal, 
“è soprattutto quello di pro¬ 
gettista di impianti. Sono 
miei clienti i centri di elebo- 
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razione dati, che hanno par¬ 
ticolari esigenze legate an¬ 
che a questioni di tempera¬ 
ture ambientali, le redazioni 
di alcuni giornali, uffici e co¬ 
sì via. Progettare gli impian¬ 
ti di illuminazione sul perso¬ 
nal computer mi è apparsa 
subito una sfida appassio¬ 
nante”. 

E così, tre anni fa, ha ac¬ 
quistato un Apple II, sce¬ 
gliendolo, dice, un po’ a ca¬ 
so. L’ha messo in azione 
dapprima per risolvere pro¬ 
blemi di contabilità e di cor¬ 
rispondenza, poi, via via, è 
giunto a formulare i preven¬ 
tivi, ad abbozzare i capitola¬ 
ti da proporre ai clienti e in¬ 
fine a impostare i progetti 
stessi. Il software in com¬ 
mercio era insufficiente per 
la soluzione dei suoi molti 
problemi, cosicché ha dovu¬ 
to realizzare da sé, con l’aiu¬ 
to di un amico programma¬ 
tore, il “suo” programma: 
sono stati necessari due me¬ 
si. Ma “fossero stati anche 
due anni, ne sarebbe valsa 
comunque la pena”. 

Il programma in pochi mi¬ 
nuti, dato il volume dell’am¬ 
biente, stabilisce il fabbiso¬ 
gno di luci e l’intensità lumi¬ 
nosa necessaria; se si deside¬ 
ra un’illuminazione non uni¬ 
forme, basta specificarlo. 
Vengono inoltre esaminati, 
e lo schema appare sul vi¬ 
deo, gli angoli di distribuzio¬ 
ne del flusso luminoso rela¬ 
tivi alle varie soluzioni pos¬ 
sibili: alla fine, basta sce¬ 
glierne una e dare il via alla 
stampante. 

“Non si può nemmeno 
immaginare quanto tempo 
risparmio da quando ce l’ho. 
Un lavoro che prima mi ri¬ 
chiedeva due giorni si pren¬ 
de adesso solamente poche 
ore. E non ho più cartacce in 
giro.” La stanza dove il si¬ 
gnor Sommacal lavora, nel¬ 
la sua abitazione a Milano, è 
infatti ordinatissima. “Il me¬ 
rito è anche di mia figlia, che 
mi aiuta a preparare con 
l’Apple bolle, fatture, pre¬ 
ventivi. Abbiamo eliminato 
l’archivio, gli schedari, i re¬ 
gistri.” 

Come evocata, appare nel 
vano della porta la figlia. 


giovanissima e minuta, 
prende timidamente posto 
davanti allo schermo acce¬ 
so. Preme qui, tocca lì, fa 
girare un programma, stam¬ 
pa qualcosa. Con grande 
confidenza. Nel suo caso, 
così giovane, forse non è sta¬ 
to strano mettersi a usare un 
computer. Ma nel caso del 
signor Sommacal? Come 
succede che una persona 
abituata da sempre a svolge¬ 
re in modo tradizionale il 
suo mestiere decida a un 
tratto di acquistare un per¬ 
sonal computer? “Basta 
avere una mentalità aperta 
al nuovo, disposta a cambia¬ 
re qualche abitudine radica¬ 
ta, e odiare le perdite di 
tempo. Non esistono pro¬ 
blemi particolari per un 
principiante, si tratta solo di 
prendere la decisione. Qual¬ 
che difficoltà può esserci, 
mai insuperabile però; io, 
nel mio caso, avevo e conti¬ 
nuo ad avere quella dell’in¬ 
glese : non lo conosco, e soft¬ 
ware in italiano praticamen¬ 
te non esiste. Anzi, è ora che 
si cominci seriamente a pro¬ 
durne!” 


INGA 


“Le principali ca¬ 
ratteristiche di un 
personal computer 
sono l’intransigenza 
e la stupidità.” 

“Uno dei problemi di una 
scuola di lingue è quello di 
“catturare” fasce di studenti 
che non possono adattarsi a 
orari troppo rigidi. Chi ha 
un’attività professionale 
spesso rinuncia a iscriversi 
perché sa fin dall’inizio che 
non potrà seguire un corso 
con regolarità.” E’ questo il 
principale motivo per cui 
Domenico Inga, direttore 
della British School e dell’I¬ 
stituto Gamma di Monza, 
ha introdotto otto mesi fa il 
computer nelle aule. 

Lo studente si presenta 
così quando i suoi impegni 
glielo consentono, inserisce 
il programma nel personal 
computer (all’Istituto Gam¬ 
ma ce n’è una decina) e, per 
un’ora lavora al video assi¬ 
stito naturalmente da inse¬ 
gnanti appositamente pre¬ 


parati. “Imparare le lingue 
con il computer è un’espe¬ 
rienza un po’ strana all’ini¬ 
zio, perché nessuno di noi è 
abituato a colloquiare con 
una tastiera; l’imbarazzo 
dura però pochissimo, giu¬ 
sto il tempo di veder girare il 
programma.” Tanto più che 
del pacchetto applicativo 
fanno parte semplici e chia¬ 
re iscrizioni sull’uso stesso 
del personal. 

Cambia anche, rispetto ai 
metodi tradizionali, il tipo di 
apprendimento: la lezione 
classica, il rapporto con l’in¬ 
segnante, la possibilità di 
parlare, sono dunque sosti¬ 
tuibili? “Le principali carat¬ 
teristiche di un personal 
computer sono l’intransi¬ 
genza e la stupidità, perché 
non è che una macchina. 
Quando rivolge una doman¬ 
da esige la risposta esatta e 
non sa cosa farsene dei dub¬ 
bi dell’allievo: i vantaggi e 
gli svantaggi della sua utiliz¬ 
zazione stanno tutti qui. 
Educa alla precisione e al¬ 
l’ordine mentale, ma manca 
di duttilità.” La funzione 
dell’insegnante presente 
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nell'aula dei computer è 
dunque importante, anche 
perché, non dimentichiamo¬ 
lo, nell’apprendimento di 
una lingua la pronuncia è un 
aspetto rilevantissimo, e i 
computer non sanno ancora 
parlare al punto da insegna¬ 
re sottigliezze di accentazio¬ 
ne, di cadenza, di pronun¬ 
cia. Inoltre, naturalmente, 
questi al computer non sono 
corsi per principianti: vi si 
iscrive solo chi ha bisogno di 
migliorare la padronanza di 
una lingua. 


All’Istituto Gamma, pe¬ 
rò, il personal computer non 
svolge quest’unica funzione; 
Domenico Inga ha avuto in¬ 
fatti un’intuizione felice, 
che avrà notevoli sviluppi in 
futuro: la creazione di pac¬ 
chetti applicativi volti a ri¬ 
solvere problemi aziendali 
collegati alla conoscenza 
delle lingue. Per ora ne ha 
pronti due, uno dei quali 
verrà lanciato sul mercato in 
gennaio; si tratta di un pro¬ 
gramma per realizzare test 
di assunzione in grado di ve¬ 


rificare il grado di padro¬ 
nanza della lingua inglese, 
su misura a seconda delle 
varie competenze: vocabo¬ 
lario tecnico specifico, cor¬ 
rettezza della pronuncia, co¬ 
noscenze grammaticali e 
sintattiche richiesti a una se¬ 
gretaria di direzione non so¬ 
no gli stessi richiesti a un 
centralinista, all’addetta al¬ 
le pubbliche relazioni e così 
via. Sul secondo programma 
da lui realizzato, invece, 
Domenico Inga è più riser¬ 
vato, perché è un po’ troppo 


Nella pagina di sinistra: Do¬ 
menico Inga, direttore della 
British School e dell’Istituto 
Gamma di Monza. Qui accan¬ 
to: Daniela Ghirardi. 

presto per parlarne; sembra 
comunque che sia una vera 
chicca. 


GHIRARDI 

“Nella comunica¬ 
zione pubblicitaria 
fa un po’ di paura 
l’immagine audace, 
troppo innovativa...” 

Ambienti molto ariosi, 
arredamento funzionale e 
simpatico, pochissimo ru¬ 
more: la soffice efficienza di 
un’agenzia pubblicitaria. 
Alle pareti, i colori dei ma¬ 
nifesti realizzati per le varie 
campagne, sulla moquette 
molte piante e, su un tavolo 
di legno chiaro, il Macin¬ 
tosh. 

“E’ un po’ il jolly dell’a¬ 
genzia, perché qui tutti lo 
usiamo per le più varie esi¬ 
genze; a volte dobbiamo 
quasi fare i turni”. 

Daniela Ghirardi, art di¬ 
rector, usa il Macintosh so¬ 
prattutto per le sue presta¬ 
zioni grafiche. “Viene utiliz¬ 
zato anche per la gestione 
clienti e, soprattutto, per le 
redemption dei concorsi; 
l’amministrazione, invece, 
che in genere nelle aziende è 
la prima a venire compute¬ 
rizzata, da noi non lo è stata 
ancora del tutto; stiamo 
provvedendo”, spiega, e in¬ 
tanto fa scorrere sul video 
simboli e parole, caratteri 
strani, marchi. 

Manovrando il mouse 
Daniela Ghirardi gioca con 
le parole, ne spezza le sim¬ 
metrie, alza alcune lettere, 
ne inclina delle altre; ne in¬ 
grandisce una sì e una no, le 
fa danzare, le scurisce... Ba¬ 
stano pochi minuti per esa¬ 
minare decine e decine di 
soluzioni possibili, che natu¬ 
ralmente restano memoriz¬ 
zate, per poter poi scegliere 
la migliore. 








Migliore significa, a se¬ 
conda dei casi e dei clienti, 
la più spiritosa, o raffinata, 
o nuova. “Spesso significa 
più elegante e più semplice: 
la maggior parte dei clienti. 
tra le varie proposte, tende a 
scegliere quella più classica: 
nella comunicazione pubbli¬ 
citaria fa un po’ di paura 
rimmagine audace, troppo 
innovativa, che rischia di 
non incontrare il gusto dei 
destinatari del messaggio. 
La bellezza del nostro lavo¬ 
ro sta appunto nel saper co¬ 
gliere lo spirito della campa¬ 
gna secondo le intenzioni 
del cliente, vestendolo poi 
con le immagini, i colori, le 
idee grafiche più appropria¬ 
te e incisive”. 

Molti ancora fanno fatica 
a capire quale funzione pos¬ 
sa avere il personal compu¬ 
ter in una professione creati¬ 
va per definizione, di cui 
fantasia e intuito sono ingre¬ 
dienti fondamentali. 

“Invece è utilissimo, so¬ 
prattutto per quanto riguar¬ 
da scritte e marchi; per 
esempio sostituisce perfet¬ 
tamente il vecchio trasferi¬ 
bile, con un risparmio di 
tempo inimmaginabile, e 
con risultati persino miglio¬ 
ri: la precisione millimetrica 
di un esecutivo stampato 
con il computer non si può 
ottenere se si lavora con il 
metodo tradizionale. In al¬ 
cuni casi, inoltre, quando la 
fretta è davvero molta, pos¬ 
siamo addirittura stampare 
direttamente su lucido, sal¬ 
tando così alcuni passaggi 
tecnici che altrimenti richie¬ 
derebbero giornate intere, 
con conseguenze facilmente 
immaginabili”. 

Grandi fogli da disegno, 
pennarelli dal temibile dia¬ 
metro, pennelli, gomme, 
forbici, pastelli e squadre, 
comunque, non mancano 
certo sul tavolo di Daniela 
Ghirardi. 

“Naturalmente gran parte 
del mio lavoro si basa anco¬ 
ra sullo schizzo, sul colore, 
sul provando e riprovando 
fatto a mano. Eppure succe¬ 
de anche che il personal 
computer sia di aiuto alla 


fantasia, grazie alla sua me¬ 
moria, alle sue caratteristi¬ 
che di ampio catalogo e suc¬ 
coso archivio di veloce con¬ 
sultazione”. 

Rispetto all’art director 
tradizionale, ma sprovvisto 
di computer, infatti, Danie¬ 
la Ghirardi ha l’indubbio 
vantaggio di poter memoriz¬ 
zare centinaia di soluzioni 
grafiche senza alcun ingom¬ 
bro; non più cartelle polve¬ 
rose da sfogliare, rotoli 
sparsi, disordine. Cosa vole¬ 
re di più? 

“Il colore. I colleghi della 
sede newyorkese hanno 
computer specializzati per 
grafica ed effetti cromatici, 
costosissimi, che sono stru¬ 
menti davvero meravigliosi. 
Io in realtà non ne avverto la 
mancanza, perché il mio è 
un lavoro di tipo diverso e il 
bianco e nero mi basta; pe¬ 
rò, certo, sarebbe diver¬ 
tente...”. 


FIORENTI 

“I miei ciienti si 
mettono davanti ai 
video e si fanno ii 
bioritmo...” 

“Un paio di anni fa mi è 
accaduto di dover fotografa¬ 
re un Apple II, ed è andata a 
finire che me lo sono com¬ 
prato, perché è uno stru¬ 
mento utilissimo; mentre io 
sono impegnato in sala po¬ 
sa, infatti, i miei clienti non 
si annoiano nell’attesa: si 
mettono davanti al video e si 
fanno il bioritmo”. Ovvia¬ 
mente scherza. Marco Fio¬ 
renti, mentre mostra le varie 
stanze del suo studio foto¬ 
grafico attrezzatissimo, con 
tanto di laser. “Una stru¬ 
mentazione di avanguardia 
è indispensabile, anche per¬ 
ché il suo esserci o non es¬ 


serci influenza l’immagine 
complessiva di tutta l’attivi¬ 
tà di un fotografo; è uno dei 
motivi per cui ho acquistato 
anche il personal compu¬ 
ter.” 

Contabilità, archivio del 
materiale, rubrica clienti- 
/fornitori sono interamente 
computerizzati: “Tutto ciò 
che è ripetitivo è affidato al 
personal; preparo a video 
anche i preventivi, che sono 
standardizzati, con le inte¬ 
stazioni appropriate, com¬ 
plete di codice fiscale, indi¬ 
rizzo e altri dati fissi. Si ri¬ 
sparmiano tempo, spazio e 
fatica”. La sorella di Marco 
Fiorenti fa grandi cenni di 
assenso; è lei che si occupa 
della parte amministrativa e 
della corrispondenza; ha in¬ 
contrato qualche piccola dif¬ 
ficoltà all’inizio, soprattutto 
perché anche lei, come il 
fratello, è interamente auto¬ 
didatta, ma ora usa il com- 
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A sinistra: il fotografo Marco 
Fiorenti. Su questa pagina: 
Gianfilippo Fanciulli, den¬ 
tista. 

puter con dimestichezza. 

Anche in sala posa, co¬ 
munque, esistono situazioni 
per le quali è utile un perso¬ 
nal computer; ogni fotogra¬ 
fia è frutto dell’attenta riso¬ 
luzione di una serie di pro¬ 
blemi tecnici ed estetici: l’al¬ 
lestimento del set, la dispo¬ 
sizione delle luci, la scelta 
dell’inquadratura. E’ un 
equilibrio delicatissimo tra 
fattori diversi a conferire o 
meno efficacia a un’immagi¬ 
ne, a darle vita, incisività, 
bellezza. Ma una volta rag¬ 
giunto questo equilibrio, 
questo gioco quasi magico di 
proporzioni, si è creato dav¬ 
vero qualcosa di irripetibi¬ 
le? “In un certo senso sì, 
perché ogni fotografia fa 
storia a sè; il computer può 
servire però per memorizza¬ 
re tutti i dati tecnici, come, 
per esempio, l’esatta posi¬ 
zione delle luci. Io uso un 
impianto di illuminazione 




FANCIULLI 


bagatella: due infermiere, 
due saie operatorie, un me¬ 
dico che collabora saltuaria¬ 
mente. “A un livello come 
questo, il personal compu¬ 
ter in studio è uno strumen¬ 
to fondamentale; non so poi 
immaginare come si possa 
farne a meno in studi più 
grandi, dove lavorino, per 
esempio, due o tre dentisti 
consociati.” 

La gestione del persona¬ 
le, i costi fissi e le spese per 
materiale e strumentazione 
sono quotidianamente sotto 
controllo, ma non solo que¬ 
sti: “Ogni mattina, in pochi 
minuti, stampo tutte le car¬ 
telle cliniche dei clienti che 
dovrò vedere nella giornata, 
nonché la situazione paga¬ 
menti; è un programma che 
ho fatto realizzare io, dopo 
aver sperimentato il Dentai 
Apple, che non è all’altezza 
delle mie esigenze”. Il pro¬ 
gramma che gira sul compu¬ 
ter del dottor Filippi (che a 
casa ne ha un altro) è in ef¬ 
fetti molto bello, e comple¬ 
to: arcate dentarie disegnate 


aerea a motore, realizzato 
da me; in questo periodo sto 
proprio studiando il modo di 
assegnare valori precisi e 
memorizzabili alle varie po¬ 
sizioni di questo impianto. 
Immagazzinare dati di que¬ 
sto tipo può essere estrema- 
mente utile.” 


‘‘I miei colieghi 
americani io consi¬ 
derano uno stru¬ 
mento necessario 
quanto ii telefono.” 

“L’immagine buffa di Pa¬ 
perino con il mal di denti 
serve a tranquillizzare i 
clienti più piccoli, che spes¬ 
so hanno paura del dentista. 
Ma in realtà la paura è ormai 
solo un problema di educa¬ 
zione.” Non si riesce a capi¬ 
re, comunque, come il dot¬ 
tor Gianfilippo Fanciulli 
possa spaventare i bambini: 
è giovane, con un sorriso 
simpatico e timido, e tiene 


nel suo studio un bellissimo 
giocattolone, che i giovani 
del nostro tempo, si sa, san¬ 
no apprezzare: un Apple //e. 

“Mi sono deciso ad acqui¬ 
starlo un anno e mezzo fa, 
dopo un viaggio in Califor¬ 
nia. Ho scoperto che là è dif¬ 
fusissimo, e che i miei colle¬ 
ghi, in particolare, lo consi¬ 
derano uno strumento ne¬ 
cessario quanto il telefono: 
c’è su tutte le loro scriva¬ 
nie”. La gestione di questo 
studio dentistico, in piazza 
IV novembre a Lissone, alle 
porte di Milano, non è una 


con precisione, situazione 
contabile ben ordinata, 
elenco delle visite effettuate 
fino a oggi con la descrizione 
di tutti gli interventi, pre¬ 
ventivi... c’è tutto. 

“Ma l’importanza del 
computer per la nostra pro¬ 
fessione è ben maggiore: i 
controlli resi possibili da 
uno strumento di precisione 
come questo consentono og¬ 
gi nuove tecniche di inter¬ 
vento,, soprattutto in orto- 
donzia. In casi un po’ delica¬ 
ti mettere un apparecchio 
dentario era, pochi anni fa. 
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un’operazione che presenta¬ 
va dei rischi, perché non era 
possibile prevedere con 
esattezza millimetrica come 
avrebbe interagito con lo 
sviluppo dei denti stessi e 
con fenomeni quali la masti¬ 
cazione. Oggi, grazie alla 
gnatologia e al computer, 
possiamo dare ai clienti ga¬ 
ranzie maggiori...” 

Appassionato di macchi¬ 
ne da corsa e di tiro con l’ar¬ 
co, il Dott. Fanciulli ha dun¬ 
que un debole anche per la 
tecnologia, e in effetti il suo 
studio è molto ben attrezza¬ 
to; il prossimo acquisto sarà 
un plotter, che gli consentirà 
di realizzare velocemente, 
per tutti i clienti, le cefalo¬ 
grafie. Migliorare la qualità 
delle prestazioni e l’immagi¬ 
ne dello studio, risparmian¬ 
do tempo e denaro, non è un 
risultato da poco, e infatti 
altri suoi amici e colleghi si 
accingono al grande passo: 
forse tra qualche anno nes¬ 
suno più potrà esimersi dal- 
l’affidare alla memoria di un 
computer le radiografie dei 
propri dentini... 


PILLITTERI 

‘‘Sono da sempre 
un appassionato di 
nautica, ma non so¬ 
no affatto disposto a 
navigare in un mare 
di carte...” 

Cosa fa nel tempo libero 
un professionista che lavora 
tutto il giorno con il perso¬ 
nal computer? L’architetto 
Carlo Pillitteri, segretario 


responsabile della Commis¬ 
sione edilizia del Comune di 
Milano, a questa domanda 
sorride. Lui, infatti, dopo 
una giornata passata a stu¬ 
diare al computer minuziose 
normative, torna a casa e si 
dedica alla sua passione: la 
barca a vela. Ma sempre con 
il computer. 

“Purtroppo non ho più il 
fisico per fare dell’agoni¬ 
smo, ma mi piace ancora oc¬ 
cuparmi di scafi da gara: ne 
seguo l’allestimento con il 


computer, verificando che i 
dati tecnici, soprattutto 
quelli relativi alla stazza, ri¬ 
spondano alle complesse re¬ 
golamentazioni stabilite dal¬ 
la Federazione italiana vela, 
di cui sono proboviro e, ap¬ 
punto, tecnico stazzatore 
autorizzato”. 

Seguire la creazione di 
una barca a vela da competi¬ 
zione è un’attività appassio¬ 
nante, qualcosa di più di un 
semplice hobby. Significa 
trascorrere i fine settimana 


Computer sì, software pure 

Non basta naturalmente il computer per risolvere tutti i problemi che si possono 
incontrare nell'ambiente di lavoro. Occorre anche il software, cioè i programmi che 
rendono il computer una docile macchina che fa esattamente quello che si richiede da lei. 

Fortunatamente per i vari modelli di Apple esistono quasi mille programmi in vendita 
in Italia. Buona parte di questi sono anche prodotti direttamente in italiano oppure 
tradotti, per cui anche chi incontra difficoltà nel capire Vinglese non è per nulla svantag¬ 
giato. 

Esiste una pubblicazione che informa semestralmente sull’esistenza di questi program¬ 
mi: Le pagine del software per Apple. Diviso per settori di applicazione, questo volume 
di 272 pagine è una guida indispensabile e uno strumento da usare ancor prima di 
acquistare un Apple. 

Ogni programma è corredato di un testo che spiega cosa fa e a cosa serve quel 
determinato pacchetto di software, chi lo produce, quanto costa, dove lo si può trovare. 

Per esempio, rimanendo nei campi di interesse degli intervistati, e senza entrare 
ovviamente nei particolari (non basterebbero tutte le pagine di questo numero di Appli¬ 
cando), Missoni avrebbe trovato in Le pagine del software per Apple la descrizione di 
cinque applicazioni di grafica '‘inventiva” adatte alle sue esigenze, l’orefice Bossi 2, 
l’elettricista Sommacal 2, Inga, della British School, 29, l’art director Ghirardi 36, il 
fotografo Fiorenti 3, il dentista Fanciulli 5 e l’architetto Pillitteri oltre 200. 
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Nella pagina di sinistra: Tav- 
vocato Carlo Pillitteri. Qui so¬ 
pra: il professor Natale. 

nei cantieri, seguendo di 
persona le misurazioni, i ri¬ 
levamenti, i controlli; signi¬ 
fica assistere con il fiato so¬ 
speso alla comparsa di pro¬ 
blemi tecnici inattesi, che 
possono decidere il successo 
di uno scafo, e alla loro solu¬ 
zione. Significa, infine, inse¬ 
rire nel computer la miriade 
di dati rilevati, e compilare 
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COSÌ una complessa tabella e 
il relativo certificato di ido¬ 
neità; qualcosa di simile al 
libretto di circolazione per 
un’automobile, ma molto 
più complicato e soggetto a 
un numero di variabili ben 
superiore. “E’ molto bello, 
e molto difficile. Il tempo 
che io posso dedicare a que¬ 
sta seconda attività è poco, 
purtroppo, perché il lavoro 
me ne prende moltissimo, 
ma il personal computer mi 
è di grande aiuto. Il pro¬ 
gramma che uso mi ha impe¬ 
gnato, per realizzarlo, quasi 
due anni, ma adesso che è in 
funzione sta restituendo con 
gli interessi il tempo investi¬ 
to.” In Italia i tecnici abilita¬ 
ti alle stazze iscritti all’albo 
sono circa settanta, ma po¬ 
chissimi di loro utilizzano un 
computer. 

” E in ufficio? “Non po¬ 
trei fare a meno del compu¬ 
ter nemmeno lì: è indispen¬ 
sabile. Sono da sempre un 
appassionato di nautica, è 
vero, ma non sono affatto 
disposto a navigare in un 
mare di carte...” 


NATALE 


“Con i dati così 
raccolti, i confronti 
statistici per la cura 
e la prevenzione del¬ 
le malattie possono 
dare risultati più at¬ 
tendibili.” 

Quando non c’è la salute 
bisogna procurarsela, e an¬ 
che alla svelta. Le lunghe at¬ 
tese per le visite prima e per 
le diagnosi poi sono più leta¬ 
li delle stesse malattie, so¬ 
prattutto dal punto di vista 
psicologico. Il personal 
computer, veloce e ordinato 
com’è per natura, è un inso¬ 
stituibile aiuto al medico per 
accelerare le diagnosi e pia¬ 
nificare le visite. 

All’Ospedale Generale 
Provinciale “Luigi Sacco” di 
Milano un Apple // aiuta il 
Prof. Natale, vice-primario 
del reparto ostetricia e gine¬ 
cologia, a svolgere meglio e 
più velocemente tre impor¬ 


tanti attività quotidiane e ce 
n’è già una quarta in prepa¬ 
razione. Per prima cosa il 
personal viene utilizzato co¬ 
me schedario clinico: in pa¬ 
role povere, le malattie e le 
patologie vengono scheda¬ 
te. Questo consente, par¬ 
tendo dalla sintomatologia, 
cioè dai sintomi della pa¬ 
ziente, di poter effettuare in 
tempi brevi la diagnosi e di 
mettee a punto velocemente 
la terapia del caso. 

Il secondo utilizzo è più 
un’ applicazione di ricerca, 
che però si sposa molto bene 
con il lavoro quotidiano del 
medico. Si tratta, infatti, di 
un vasto e aggiornato archi¬ 
vio di casi clinici suddivisi 
per soggetti. Attraverso 
questo archivio e con l’ausi¬ 
lio di funzioni statistiche è 
possibile mettere a confron¬ 
to due o più gruppi di sog¬ 
getti per studiare le probabi¬ 
lità di insorgenza delle varie 
malattie in questi gruppi e 
quali interventi farmacolo¬ 
gici hanno più probabilità di 
portare velocemente alla 
guarigione. 

La terza incombenza del¬ 
l’Apple si potrebbe definire 
di prevenzione. Utilizzando 
un programma di banca dati 
viene gestito un indirizzario 
che consente di richiamare 
periodicamente l’attenzione 
delle pazienti curate in pas¬ 
sato all’ospedale “L. Sacco” 
sull’importanza delle viste 
periodiche di controllo. 

In futuro, ha confidato ad 
Applicando il professor Na¬ 
tale, ha allo studio la possi¬ 
bilità di utilizzare l’Apple 
anche nel campo farmaceu¬ 
tico. “L’arrivo dell’Apple in 
reparto ha consentito un mi¬ 
glioramento notevole della 
qualità del lavoro di tutta 
l’équipe medica. I maggiori 
vantaggi si sono riscontrati 
nella possibilità di avere car¬ 
telle cliniche più complete e 
più facilmente aggiornabili. 
Con i dati Così raccolti, i 
confronti statistici per la cu¬ 
ra e la prevenzione delle ma¬ 
lattie possono dare risultati 
più attendibili e, quindi, di 
maggior efficacia nella lotta 
quotidiana contro le malat¬ 
tie.” 
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Maria e Domenico hanno pensato che un personal 
computer potrebbe aiutarli moltissimo nel lavoro quotidiano. 
Decidono così di farsi un utile r^alo per Natale. 



& 


//< 


MACINTOSH 


Maria e Domenico 
esponine al rivenditore i 
loro problemi: Maria è traduttrice, 
scrive molti testi e li deve 
Domenico è grafico, deve preparare 
testi e disegni da presentare ai 


Ecco i nostri 
due amici che 
si recano dal 

più vicino rivenditore Apple 
per un consiglio ed eventualmente 
per fare Tacquisto. 


Per Maria il personal computer 
giusto è l'Apple //c: 
con il testo battuto e visualmato 
sul video non ci sono problemi 
per modifiche e correzioni 


Quando la traduzione 
toma con le correzioni 
finali del cliente 
in un momento 
si prepara 
il testo definitivo. 
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n rivenditore identifica subito il tipo di personal 
c^l^uter che meglio si adatta a 
applicazioni: per 
W è il 


Il Macintosh con le sue 
possibilità grafiche 
sembra fatto s^posta 
per il lavoro creativo. 

Macintosh è im’idea 
e il bozzetto è pronto 
in un attimo. 


Nelle scatole si trova 
in bella vista tutto 
ciò che serve X)er i vari 
collegamenti. 


Ecco Domenico che 
arriva nel suo studio, 
ansioso di collegare e 
j Iti lizzare il suo sistema 


L’acquisto e deciso 
e i nostri amici escon( 
soddisfatti dal 
Computer Shop 
con il loro 
nuovo "aiutante". 


Aprendo la scatola del Macintosh 
si identifica subito il computer 
e le scatole del mouse e della tastiera 
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Un cavetto spiralato serve a collegare 

O la tastiera al computer: basta 

inserire gli spinotti, che si fermano 
▼ nella giusta posizione con un "click". 


® n connettore per il mouse e sul retro del computer: 

si identifica facilmente perchè 
^ è segnalato dal disegno di un mouse. 

Due vili awitabili a mano bloccano la connessione. 


Anche Maria è impaziente di o 
lavorare con il suo nuovo computer ^ 


App)ena inserito, il dischetto 
trasferisce i programmi al 
Macintosh. Se si vuole, sarà 
il computer stesso a 
ins^nare come utUizzarUc 


Dopa aver collegato la spina 
dell’alimentatore alla presa di corrente 
si può collegare l’alimentatore al 
computer: lo spinotto è vicino all’interruttore. 


A 


Si collega poi il monitor all’alimentazione 
di rete e al computer attraverso gh appositi cavi. 
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Più in alto di tutti gli altri 

© connettori, vicino aU'interruttore, 
si trova la spina a cui coUegare 
V u cavo di alimentazione dalla rete. 


o 

▼ 


Il sistema è pronto, 
basta accenderlo e inserire 
il dischetto 
con i programmi 



Il monitor ha una scatola a 
parte. In questa si trovano il 
manuale, il cavetto di 
coUegamento con il computer e 
il cavo d’alimentazione. 


A questo punto il sistenm 
e OK: si inserisce il dischetto 
▼ e si accende il computer. 


Nella scatola dell'Apple//c si trova il computer, 
l'alimentatore, i cavi di connessione, 
il modulatore per il collegamento con il 
televisore, i manuali e i dischetti con 8 progranuni. 


Non ci resta che 
augurare buon 
^ lavoro a Maria e 
Domenico! 


49 




AUT. MIN. GONG. 
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È dedicato ai lettori di Radio Elettronica & Computer il concorso più 
avvincente dell'anno. Compra il numero ora in edicola della rivista: 
se - con l'aiuto di un dettaglio fotografico - scopri l'identità del pre¬ 
mio misterioso, puoi vincerlo! Inoltre partecipi all'estrazione di: 1 ZX 
Spectrum 48K, 4 ZX Spectrum 16 K, 9 ZX Microdrive, 35 volumi. 
Buona Caccia! ^ 





Informazioni, recensioni libri e software, segnalazioni di nuove periferiche... 
Un chi, cosa, dove e quando tutto dedicato al 
Macintosh. Ogni mese, a partire da questo mese... 


Quante cose col Mac 


Ha inizio da questo numero una 
rubrica fissa che mensilmente, almeno 
fino a tutto il 1985, ha lo scopo di 
tenere informati i lettori sulle novità 
software relative a Macintosh. Natu¬ 
ralmente all’inizio potremo fornire 
notizie soprattutto provenienti dagli 
States, ma sappiamo che pure in Italia 
si sta lavorando alacremente per pro¬ 
durre software o per tradurre nella no¬ 
stra lingua software americano. Di 
conseguenza, non appena entreremo 
in possesso di notizie più dettagliate 
per quanto riguarda il software in ita¬ 
liano, ci affretteremo a comunicarle 
attraverso queste pagine. Nel frattem¬ 
po, anche dagli USA le novità sono 
interessanti, e non è poi così difficile 
ordinare il software per corrisponden¬ 
za. Basta avere una carta di credito 
valida all’estero (Bankamericard e 
American Express sono accettate da 
quasi tutti i produttori di software 
americani) e indicare nell’ordine scrit¬ 
to il numero di carta di credito e la 
relativa scadenza. Nel giro di tre, 
quattro settimane, si riceve a casa 
quanto ordinato. Le aziende o i liberi 
professionisti interessati a scaricare il 
costo dell’acquisto dovranno, quando 
dalla Posta italiana si vedranno recapi¬ 
tare un modulo da compilare relativo 
al pacchetto proveniente dall’estero, 
nel frattempo giacente presso qualche 
posta centrale, compilarlo e allegare 
fotocopia della fattura arrivata diret¬ 
tamente dall’America in busta a parte. 
Se volete essere sicuri di quest’ultimo 
particolare, al momento dell’ordine ri¬ 
chiedete che la fattura vi venga inviata 
a parte. Nel giro di 24, 48 ore dal mo¬ 
mento in cui avrete restituito il modu¬ 
lo postale compilato, allegandovi an¬ 
che la somma dovuta per PIVA, calco¬ 
lata al 18% del prezzo espresso in dol¬ 
lari e convertito al cambio del giorno, 
riceverete al vostro indirizzo il pacco. 
A onor del vero, è una delle poche 
prassi che le Poste italiane espletano in 
tempi brevi. Chi invece non ha la ne¬ 
cessità di scaricare il costo, può limi¬ 
tarsi a far passare la cosa come una 
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Figura 1. In alto. Un’immagine di MACFATS, Storyboarder adatto ad agenzie di 
pubblicità, sceneggiatori televisivi e cinematografici. Qui sopra: MacDrow. 
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niEmoR Informatica srl 

Y.ToglÌQtti 4 56030 P grigrwmo Pi 

Rivendiior* e centro ossistenzo 
AUTORIZZATO 

^appkz computer 

_ ■ ■ fin dal 1980 

HWRDtIflBE : con garonzia 

Oppia.. Tutta la gamma . 

. .a prezzi super .scontati, 
per i f er i che e occessor i . . 
un ^onde assortimento 
...ai p>rezz i p i u ' bass i. 
Supervdiutazione dell'usato 

SOFTUBBE : con aggiornamenti 

SBC - Gestione servizi 
per comuni medio-pfecoii^ tributi, 
anagrafe,stato civile,elettorale. 

S^H - Gestione fìziende 
or dini/produz / mogazz /fotturoz. / 
pagamenti / stotistiche /budget /iva 
contobilita' generale e forfettaria. 

SOS - Gest. studi commerc. 
simulazione /pianificazione /analisi 
statistiche /grafica /archiviazione. 

gestione/orchivioz. e stampa deOa 
modulistica fiscale ricorrente. 

SDJ- Gest. studi tecnici 
oltre 70 pokage per wchiviore, 
progettore, ooicolare, disegnare. 

?PP - Didattica e Insegn. 
oltre 20 pokage o libro elettronico 

SDC - Hobby Casa Giochi 
oltre 100 dischi per onimazione, 
autooi^rendimento, grofico, quiz, 
sintetizzazione vocole, avventure. 


Condizioni partico lori 

sono previste per gli operotori 
commercioli del settore 


Richiedere specifiche e prezzi per 
il settore interessato inviando lit. 
3.000 in francobolli o passandoci 
uno ordinazione anche telefonica. 


Per dettagli tecnici urgenti : 
TELEFONARE allo 0587 - 616084 


MATERIALI FORNITI CON 
GARANZIA 

SODDISFATTI 0 RIMKJRSATI 



Figura 2. MacVegas, il pacchetto di 7 
giochi d’azzardo della Videx. 

“regalia”. Comunque il modulo posta¬ 
le in questione prevede diverse possi¬ 
bilità, tra le quali scegliere i più adatti 
alle proprie esigenze. 

Silenzio, si gira 

Si chiama MACFATS e ha come 
sottotitolo Storyboarder. E’ un pac¬ 
chetto applicativo che permette di fare 
le sceneggiature animate. Utilissimo 
dunque ad agenzie di pubblicità e per 
chi lavora nel campo del cinema e del¬ 
la televisione. I singoli fotogrammi 
vengono realizzati con l’aiuto di Mac¬ 
Paint o di MacDraw, oppure si posso¬ 
no “pescare” da fornitissimi archivi di 
disegni che possono essere richiesti a 
parte. I fotogrammi si montano poi 
facilmente in sequenza e si possono 
perfino animare, ottenendo per esem¬ 
pio l’effetto della pinna del pescecane 
che si muove in un mare increspato. 
Produttore: American Intelliware 
Corporation, 330 Washington Street, 
Marina Del Rey, California 90292. 
Telefono (per chi chiama dall’Italia) 
001-213-82^0803. Prezzo al pubblico: 
395 dollari. 

Butta la riga 
e getta la matita. 

Esiste, per Lisa, anche la versione 
italiana; per Mac, ahimè, bisogna ac¬ 
contentarsi di quella americana. Si 
tratta di MacDraw, un potente pac¬ 
chetto applicativo che permette di 
creare strutture grafiche di vario tipo, 
soddisfacendo praticamente esigenze 
illimitate. Serve a comporre illustra¬ 
zioni tecniche, piante di locali con tan¬ 
to di arredamento, o a preparare il 


materiale illustrativo da proiettare du¬ 
rante confrenze o relazioni. E tante 
altre applicazioni. Produttore: Apple 
Computer Ine., 20525 Mariani Ave- 
nue, Cupertino, California 95014. Te¬ 
lefono (dall’Italia): 001-800-538-9696. 
Prezzo al pubblico: 125 dollari. 

A Las Vegas 
voglio andare 

E’ un pacchetto di 7 giochi: bacca- 
rat, blackjack, dadi, keno, poker, rou¬ 
lette, slot machine. Giustamente lo 
hanno chiamato MacVegas, ma per 
fortuna si può giocare a lungo senza 
perdere nemmeno un soldo. Natural¬ 
mente viene sfruttata in pieno tutta la 
potenzialità grafica del Macintosh, e 
di conseguenza il verismo del gioco 
risulta fuori del comune. La pallina 
ruota a lungo intorno al bordo della 
roulette prima di cadere in una delle 
caselle con i numeri. La leva della slot 
machine, il famoso one harm bandit, il 
bandito da un braccio solo, come veni¬ 
vano chiamate queste infernali mac¬ 
chinette neH’America anni Trenta, 
viene tirata giù” servendosi del mou¬ 
se. Quando risale, i simboli negli ap¬ 
positi quadrati girano e si posizionano 
facendo vincere o perdere un immagi¬ 
nario ma ben disegnato mucchietto di 
monetine. In quanto a ciliegine (ma si 
vince appena il doppio o il quintuplo 
della puntata) la macchinetta elettro¬ 
nica è meno avara delle sue sorelle 
maggiori: chi ha scritto il programma 
si è forse preso in questo modo una 
piccola rivincita personale. Produtto¬ 
re: Videx Ine., 1105 N.E. Circle Blvd., 
Corvallis, Or. 97330. Telefono (dall’I¬ 
talia): 001-503-758-0521. Prezzo al 
pubblico: 59 dollari. 

Negoziatore offresi... 

Potrebbe usarlo Reagan per nego¬ 
ziare con Cernenko, oppure Agnelli 
con i metalmeccanici. O, più prosaica¬ 
mente, potrebbe risultare molto utile 
a un venditore di enciclopedie di fron¬ 
te a un acquirente riottoso. Si tratta di 
The Negotiation Edge, un programma 
che analizza i problemi e la personalità 
di due “contendenti” seduti allo stesso 
tavolo delle trattative e che suggerisce 
a uno dei due (quello che usa il Macin¬ 
tosh, ovviamente) la strategia migliore 
da adottare per spuntarla. In america 
ha incontrato grande successo e sem¬ 
bra essere di valido aiuto nelle trattati¬ 
ve d’affari. Produttore: Human Edge 
Software Corporation, 2445 Faber 
Place, Palo Alto, CA 94303. Prezzo al 
pubblico: 295 dollari. 


























Applicando ha un futuro 


Applicando cresce. Cresce perché ha tanti programmi 
da pubblicare e tante informazioni da dare. 
E diventa MENSILE. Sì, tutti i mesi Applicando ti porta 
in ufficio, a casa, a scuola tante, tantissime idee utili 
per trarre il meglio dai tuo Apple. Per non perderti né un 
programma, né una novità, né una informazione, che 
potrebbe esserti indispensabile, abbonati. Riceverai 
Applicando tutti i mesi e inoltre avrai in regalo 
Le Pagine del Software (del valore di 12.000 lire) oppure, 
se scegli la formula senza dono, risparmierai 
10.000 lire sul costo dell’abbonamento. 
A tutti comunque la Facility Card Applicard. 
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□ Allego assegno non trasferibile di lire. 
intestato a EDITRONICA srl 


□ Allego ricevuta di versamento di lire. 

sul c/c postale N. 19740208 Intestato a Editronica 
Srl, Corso Monforte 39, 20122 Milano. 

□ Pago fin d’ora lire.con la mia carta 

di credito BankAmericard W 

N.scad.(A) 

autorizzando la Banca d’America e d’Italia ad ad¬ 
debitare l’Importo sul mio conto BankAmericard. 


Cognome 
Nome. 


□ Inviatemi dieci numeri di Applicando e la carta 
Applicard a 40.000 lire. 


I Desidero che il mio abbonamento abbia inizio dal 
I numero. 


□ Inviatemi i seguenti arretrati a 7.000 lire cadau¬ 
no (per l’elenco degli arretrati disponibili vedi a 
pagina 17) 


□ Inviatemi dieci numeri di Applicando, Le Pagine 
del Software e la carta Applicard a 50.000 lire. 


^DmlDOgl DD[r® 

Qui [FtSSSlO© 


\ 

\ 


/ CAP.Città 


Prov 


\ 


Compila e spedisci a Editronica sri, 
C.so Monforte 39, 20122 Milano 
Oppure abbonati nei migiìori 
Computer Shop. 


Data.Firma. 

□ Desidero fattura. Il mio Cod.Fisc./Part.lVAè 





























































Non preoccupatevi, non è il famoso eroe 
degli anni Cinquanta, rivisitato in chiave moderna, 
bensì un tastierino numerico 
pronto a entrare in azione ogni volta che... 



Nembo Keyd 


Q uesto programma permette di ri¬ 
definire una sezione della tastie¬ 
ra dell’Apple// o //plus o //e e //c in 
modo che hmzioni da tastierino nume¬ 
rico. Il tastierino può essere attivato e 
disattivato con comando da software. 

Il tastierino viene attivato con 
CALL768 e disattivato con CALL785. 
Mentre è attivo, il programma acccet- 
ta l’input soltanto dai tasti designati; 
alla pressione degli altri tasti risponde 
un hip dell’altoparlante. Le frecce si¬ 
nistra e destra, (RETURN), (RE- 
PEAT) e (RESET) sono i soli altri 
tasti che funzionano normalmente 
(vedere in fìgura 1 la disposizione del 
tastierino). I caratteri di input possono 
essere assegnati a qualsiasi tipo di va¬ 
riabile: intero, reale, stringa. 

Le modifiche del programma che 
ospita il tastierino sono in genere mini¬ 
me. Per esempio, se il codice di una 
linea è in origine: 

300 INPUT “INTRODUCI IL 
C.A.P.”; Z 





'T’-ì,' 
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Ma anche un passato. 

Applicando è una miniera di idee, di programmi, di articoli, 
di suggerimenti. Perderne uno è un peccato. Le scorte sono limitate e il 
numero 2 è già esaurito. Affrettati a spedire il tagliando di pagina 15. 



1 - Maggio-Giugno 1983 - Lire 
7.000 - Una guida per utilizzare il WPL e 
per rendere automatico il lavoro d’uffi¬ 
cio • Il VisiSchedule, un programma 
per ottimizzare i tempi di lavorazione • 
Statistiche • Come aumentare la capa¬ 
cità dei dischetti • Tutti gli uomini di 
Dossier • Un utile esercizio di ortogra¬ 
fia e di tastiera • Analizzare entrate e 
uscite in funzione del punto di pareggio 

• L'Apple//diventa un orologio-sveglia 

• Tu sei il guardiano del castello e hai 
venticinque colpi da sparare contro gli 
intrusi • Un calendario perpetuo • Di¬ 
segniamo sullo schermo • Come tra¬ 
sformare la tastiera di un Apple/// in 
quella di un pianoforte • Caccia al 
tesoro, a nuoto, fra le insidie di tronchi 
galleggianti • Tabella di compatibilità 
dei programmi APPLE//e Apple II. 



3 - Settembre/Ottobre 1983 - Lire 
7.000 - Un programma di Data Base 
accessibile a tutti • Ecco Logo in italia¬ 
no • Una scheda e una telecamera e il 
tuo Apple vede • Etichette spiritose o 
bizzarre, di lavoro o di ogni genere • 
Piccoli editori, circoli, club e associa¬ 
zioni possono raggiungere soci e abbo¬ 
nati facilmente, servendosi di questo 
programma dal costo contenuto • Equo 
canone col VisiCalc per padroni o in¬ 
quilini • Una routine e la Epson M-80 
stampa i grafici • Seconda puntata del 
corso di Basic • Poche domande sullo 
schermo, per rispondere alle quali basta 
una segretaria, ed ecco pronto in cinque 
minuti un documento di più pagine per¬ 
sonalizzato scegliendo fra decine di op¬ 
zioni diverse semplicemente con un uso 
accorto del WPL • Dadi e punti (gioco). 


4 - Novembre-Dicembre 1983 - Li¬ 
re 7.000 - Tre schede, una tastiera e un 
po’ di software; e il computer diventa 
un’intera filarmonica digitale • Piano¬ 
forte, organo e violino in Pascal • Per 
imparare a leggere più velocemente (e 
per fare esercizio d’inglese) • Elogio 
del VisiDex • Grazie Lisa: cos’è e a chi 
può servire il rivoluzionario personal 
computer della Apple • Rompiquindici; 
quindici pedine bianche da mettere nel 
giusto ordine • Per chi ha i dischetti del 
Sistema Pascal, ecco una rassegna del¬ 
le possibilità offerte e dei comandi a 
disposizione • Il programma Dedalus 
• Terza puntata della guida Basic • 
Guida ragionata dei software in com¬ 
mercio per la gestione condominiale • 
Una numeric keypad fatta solo di soft¬ 
ware. 


5 - Gennaio-Febbraio 1984 - Lire 
7.000 - La tecnologia del mouse appli¬ 
cata ad Apple// e Apple/// • Mcintosh, 
piccolo, maneggevole, portatile • In 
memoria i vostri impegni di un anno 
intero • Un programma per la contabili¬ 
ta’ semplificata • Un gioco per due, nel 
quale si danno battaglia cannoni di 
grosso calibro • Investor in portafoglio: 
uno dei migliori programmi da digitare 
(oppure su dischetto a sole settantamila 
lire) fornisce in tempo reale il quadro 
esatto di come vanno i propri investi¬ 
menti finanziari. Molto semplice come 
struttura, Investor e’ l’ideale per la ge¬ 
stione del proprio portafoglio titoli • 
Quarta puntata del corso di Basic • Il 
famoso gioco delle freccette in versione 
elettronica per Apple • Prima puntata di 
un facile corso di Pascal. 



S- Marzo-Aprile 1984 -Lire 7.000- 
Fre per te; un unico software per data- 
Dase, word-processor e spreadsheet • 
^nteprima di Apple //c: c come comple- 
:o, compatto, compatibile, ma anche 
Dortatile, leggero, versatile • Titoli di 
stato, cartelle fondiarie, obbligazioni: 
'Apple vi aiuta a difendere i vostri ri¬ 
sparmi • Un mostro tira l’altro: riusci- 
■ete a mangiarli tutti? • Stress: un nuo- 
/o gioco per vincere lo stress • Memo- 
1a riga per riga: come localizzare alcune 
3erti di un programma velocemente con 
I Linefinder • Seconda puntata del Pa¬ 
scal: cos’e’ un compilatore? E un com- 
Dilatore in formato libero? • L’Apple¬ 
soft per semplificare l’impaccamento 
lei record e il recupero delle informa- 
doni dal dischetto • Grafici a passeg¬ 
gio: il dump della pagina grafica da 
^pple // a una stampante semigrafica. 


7 - Maggio-Giugno 1984 - Lire 
7.000 - ProDos: il nuovo sistema opera¬ 
tivo con nuovi comandi e con la possi¬ 
bilità’ di usare il ProFile e il Mouse • 
Computer e pennello: Apple per realiz¬ 
zare su schermo capolavori di pittura • 
Topolino aiuta i bambini a riconoscere i 
numeri • Programmi top-secret: impe¬ 
dite ai curiosi di ficcare il naso nei vostri 
programmi • Una cassetta di salvatag¬ 
gio per registrare su nastro i vostri pro¬ 
grammi piu’ importanti • Grafica e ani¬ 
mazione: sesta puntata dell’Applesoft 
per svelarvi tutti i segreti della grafica • 
Tipi e variabili: terza puntata del Pascal 
• Diventa un disk-jockey infallibile: 
l’Apple tiene in ordine l’archivio dei tuoi 
dischi • AIUTO: un programma che vi 
consente di trovare subito gli errori di 
battitura e di correggerli tutti insieme. 


8 - Luglio-Agosto-Settembre 1984 

- Lire 7.000 - 37 nuovi programmi per 
Mac: tutte le novità’ del NCC di Las 
Vegas • Personalizza i messaggi d’er¬ 
rore dei tuoi programmi • Appliscuola: 
una nuova serie di articoli e programmi 
studiati per la scuola da Enzo Tonti, 
docente universitario • Le Mans in pol¬ 
trona: partecipate alla corsa automobili¬ 
stica piu’ famosa del mondo • Due dita 
sono sufficienti per scrivere con il com¬ 
puter, ma con dieci... • Un computer 
per segretario: tutti i trucchi delle mi¬ 
gliori segretarie e come realizzarli con il 
computer • Trasformate il vostro Apple 
in un melodioso organo • La struttura 
dei dati: quarta puntata del corso di 
Pascal • La scelta della stampante e’ 
importante: se l’accopiata col computer 
e’ vincente... • Scritte lampeggianti, 
caratteri che scorrono e altri effetti con 
l’Applesoft. 


Compila e spedisci subito il tagliando 
della pagina 15 a: Editronica - 
Ufficio arretrati di Applicando 
Corso Monforte 39, 20122 Milano 































la linea modificata si presenta così: 


300 CALL768: INPUT“INTRODU- 
CI IL C.A.P.”; Z: CALL 285 


Come funziona 

Il listato del programma è diviso in 
cinque sezioni: 

1-19 intestazione, assegnazione dei la¬ 
bel e brevi istruzioni 
22-43 routine destinate a inserire e di¬ 
sinserire il tastierino 
45-62 routine del tastierino 
64-70 tavola delle battute di input 
71-76 tavola dei caratteri di output 

La prima sezione non ha alcun codi¬ 
ce eseguibile ed esiste solo per etichet¬ 
tare il listato, assegnare i label alle 
cinque locazioni di pagina zero utiliz¬ 
zate, assegnare i label ai punti di intro¬ 
duzione delle due routine di monitor 
utilizzate e indicare i comandi di inse¬ 
rimento e disinserimento del tastieri¬ 
no. La seconda sezione (da linea 22 a 
linea 43) contiene le routine di On e 
Off\ le linee da 22 a 27 memorizzano i 
precedenti hook della routine di input 
e li reinseriscono a KSWL e 
KSWL+l. 

La terza sezione (linee da 45 a 62) è 
il cuore del programma. Accetta le 
battute, determina se sono valide per 
il tastierino e provvede all’output del 
carattere appropriato. La linea 47 uti¬ 
lizza una routine di monitor per acce¬ 
dere alla tastiera e ricevere la successi¬ 
va battuta. Questa routine lascia nel¬ 
l’accumulatore il valore ASCII della 
battuta; la linea 48 memorizza la bat¬ 
tuta in “TEMP” per un futuro impie¬ 
go. Le linee da 49 a 50 memorizzano il 
registro Y in YSAV e impostano il 
registro Y 0. Il registro Y viene usato 
come contatore. La linea 51 riceve il 
successivo valore della tavola di input 
e lo memorizza nell’accumulatore. La 
linea 52 prova se il valore proveniente 
dalla tavola di INPUT (ora nell’accu¬ 


mulatore) sia uguale al tasto premuto 
(ora in TEMP). Se non sono uguali, la 
routine salta alla linea 57. Le linee 54- 
56 ricevono il valore di sostituzione 
della tavola di output, ripristinano il 
vecchio registro Y e ritornano alle nor¬ 
mali routine di input nel monitor. Alle 


linee 57-59 si accede solo se non è stata 
ancora trovata una corrispondenza. 
La linea 57 incrementa e registra Y e la 
linea 58 controlla se sia stata raggiunta 
la fine della tavola di input. Come è 
scritta la tavola di input è lunga 16 byte 
($10), comincia alla locazione $343 e 


SOURCE FILE: TASTIERINOIIE 
0808: 1 ; 

0000: 2 iTASTlERINO NUMERICO 

0000: 3 ;DI AU^ B. COHEN 

0000: 4 jCOPYRlGHT (C) 1984 

0800: 5 ;BY APPLICANDO & 

0008: 6 ; MICRO-SPARC, INC. 

0000 : 7 ; 

0800: 8 ; 

0000: 9 ; 

-NEXT OBJECT FILE IS TASTIERINO 


6308; 

18 

0R6 

$306 


6886: 

11 KLSAi; 

EQU 

$06 

)ISTRUZIONI: 

8807: 

12 KHSA^) 

EQU 

$07 

;ATTIVAZIONE: 

8888; 

13 TEMP 

EQU 

$88 

jJSR $300 / CALL 768 

8834; 

14 YSAV 

EQU 

$34 

IDISATTIWZIONE: 

8838: 

15 KSUL 

EQU 

$38 

;JSR $315 / CALL 789 

FOIB: 

16 KEYIN 

EQU 

$FD1B 

iFUNZIOltt CON 

FF3A: 

17 BELL 

EQU 

$FF3A 

{APPLESOFT & INTEGER 

A8S1: 

18 DOS 

EQU 

$A851 


1^55; 

19 DOSKL 

EQU 



8306: 

20 ; 




8308: 

21 ; 




8368; 

22 iMEMORlZZA HOOK INIZIALI 

8388: 

23 1 




8380;AD 55 M 

24 

LDA 

DOSKL 


8363:85 86 

25 

STA 

KLSAV 


8385;AD 56 AA 

26 

LDA 

DOSKLtl 


8388:85 87 

27 

STA 

KHSAV 


838A; 

28 ; 




838A: 

29 iIMPOSTA HOOK PER AWIO TASTIERINO 

838A: 

38 ; 




830A;A9 28 

31 

LDA 

il>START 


838C:85 38 

32 

STA 

KSUL 


838E:A9 83 

33 

LDA 

#<START 


8310:85 39 

34 

STA 

KSUL^l 


8312;4C 51 A8 

35 

JMP 

DOS 1 

{CONSERVA I LATCH DOS 

8315: 

36 ; 




8315: 

37 iRElMPOSTA GLI HOOK PER ESCLUDERE IL TASTIERINO 

8315; 

38 ; 




8315;A5 86 

39 

LDA 

KLSW 


8317:85 38 

48 

STA 

KSUL 


0319 :A5 07 

41 

LDA 

KHSAV 


8318:85 39 

42 

STA 

KSUL+1 


8310:4C 51 A8 

43 

JMP 

DOS 



56 












termina a $352. Quando il valore del 
registro Y raggiunge $10, il program¬ 
ma cerca il carattere di input alla loca¬ 
zione $353 ($343-FIO), che è oltre la 
fine della tavola. Fintanto che il regi¬ 
stro Y non è uguale a $10 il program¬ 
ma prova la successiva voce della ta- 


8320: 

0326: 

0328: 

0320:26 IB FD 
0323:85 88 
8325:84 34 
0327:A0 88 
0329:89 43 03 
032C:C5 08 
032E:D0 06 
0330:89 53 03 
0333:A4 34 
6335:60 
0336:C8 
0337:C0 16 
8339:00 EE 
0338:28 3A FF 
033E:A4 34 
0340:4C 20 03 
0343: 

8343: 

0343: 

0343:80 AE 88 
0346:CA CB 
0348:CC 05 C9 
834B:CF 87 
0340:88 89 88 
8358:95 AD 
0352:80 
8353: 

8353: 

0353: 

0353:80 AE 80 
0356:81 82 
8358:83 84 85 
0358:86 87 
0350:88 89 88 
0368:95 AO 
0362:AB 
0363: 

0363: 

0363: 

*»» SUCCESSFUL ASSEMBLY: NO ERRORS 


bella. Se è stata raggiunta la fine della 
tabella, vengono eseguite le linee 60- 
62. Queste linee fanno emettere il bip 
all’altoparlante e ritornano a linea 47 
per ricevere un’altra battuta. Le tavo¬ 
le di input e output alle linee 66-76 
contengono le battute valide e i corri- 


Figura 3. Listato 1. 


1 REM *»************>**»*****»*«**** 

2 REM * SUPER TASTIERINO NUMERICO « 

3 REM « DEMO » 

4 REM » BY ALAN B. COHEN « 

5 REM « COPYRIGHT (C) 1984 » 

6 REM » BY APPLKYYIDO i « 

7 REM » MICRO-SPARC INC » 

8 REM ***«»*««*«*««*««*«*«»««*««**« 

10 REM TASTIERINO DEMO 
15 REM INAPPLESOn 

20 TEXT : HOME 

25 PRINT CHR» (4):'BL0AD TASTIERINO’ 

30 PRINT 'INTRODUCI DUE NUMERI, 

SEPAIWTI DA’: PRINT : PRINT 
'UN tRETURN)’:PRINT : PRINT ’IL 
TASTIERINO E' INSERITO.’: PRINT 
40 CALI 768: INPUT NI : 

INPUT N2: CALI 789 
50 PRINT : PRINT 'TASTIERINO 
DISINSERITO.’ 

60 VTAB 10: PRINT ’I NUMERI 
CHE itti INTRODOnO SONO:’ 

70 PRINT : PRINT NI,N2: PRINT 
90 PRINT 'LA SOttW DI QUESTI DUE 
NUMERI E':’: PRINT : PRINT NI ♦ N2 
100 END 

Figura 4. Listato 2. 

spendenti caratteri di sostituzione. 
Vedere in figura 2 un diagramma di 
flusso della logica del programma. 

Osservazioni finali 

11 listato in basic (figura 4) è un 
“DEMO” sul funzionamento. Per in¬ 
serire il listato in linguaggio macchina 
(figura 3) si possono seguire due stra¬ 
de: 

1. Chi possiede l’assembler del Toolkit 
può battere il listato dalla linea 1 alla 
linea 79; 

2. Coloro che non hanno pratica con 
Tassembler devono andare in monitor 
(CALE -151) quindi battere 300: e in¬ 
serire i numeri e le lettere della secon¬ 
da colonna da riga 24 a riga 76 a bloc¬ 
chi di 48 per volta. Per esempio: 


300: AD 55 A A 85 A6 e così via 


Per salvare il programma su dischetto 
digitate BSAVE TASTIERINO, A$ 
300, L$ 63. 

Il tasto Caps Lock, quello che bloc¬ 
ca le maiuscole, deve essere bloccato 
in basso perché il tastierino entri in 
funzione. Il programma gira anche su 
Apple //c, modificando il listato: 
riga 68 sostituire $AD con $DF 
riga 69 sostituire $BD con $AB 
riga 76 sostituire $BD con $AB 


44 

45 
U 


ROUTINE PRINCIPALE DEL TASTIERINO 


47 START 

JSR 

KEYIN 

iRlCEVE IL TASTO 

48 

STA 

TEMP 

IMEMORIZZA IL TASTO 

49 

STY 

YSAV 

jMEMORIZZA REGISTRO Y 

56 

LDY 

000 

:CONTATORE ZERO 

51 LOOP 

LOA 

INPUT,Y 

iCARICA LA Y-ESim VOCE 

52 

CMP 

TEMP 

iCONFRONTA 

53 

BNE 

NEXT 

jNO, VOCE SEGUENTE 

54 

LOA 

OUTPUT,Y 

;S1, RICEVE SOSTITUZIONE 

55 

LDY 

YS(!W 

;RIPR1ST1(W REGISTRO Y 

56 

RTS 


iCONTINUA INPUT ROUTINE 

57 NEXT 

INY 


iINCREMENTA CONTATORE 

58 

CPY 

0fl0 

;FINE DEL CONFRONTO? 

59 

BNE 

LOOP 

|N0, PROVA VOCE SEGUENTE 

66 

JSR 

BELL 

iSl, BEEP 

61 

LDY 

YSAM 

{RIPRISTINI REGISTRO Y 

62 

JMP 

START 

{PROVA DI NUOVO 

63 : 




64 iBATTUTE 01 

INPUT VALIDE 

65 ; 




66 INPUT 

OFB 

$80,IAE,$B8,$CA,$CB 

67 

OFB 

«C,$05,$C9,ICF,$B7 

68 

DFB 

IB8,$B9,l88,f95,$A0 

69 

OFB 

«80 


70 ; 




71 iTAVOLA CODICE TASTI OUTPUT 

72 1 




73 OUTPUT 

OFB 

«8D,«AE,«B8,$B1,«B2 

74 

DFB 

«83,«84,«85,«86,«87 

75 

DFB 

«B8,«B9,«88,«95,«A0 


76 

77 

78 

79 


DFB $AB 


FINE 


® 1984 by Nibble e Applicando 
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Sisteoia Fldairàd Paktie 
per du^oàtive immediate 35 nun. 


^Per ulteriori informazioni spedite I 
questo tagliando a: 


POLAROID (Italia) S.pA. 

Divisione Prodotti Industriali e 
Professionali 

Via Piave, 11 - 21051 ARCISATE (Varese) 
Tel. 0332/470031 



Il sistema Polaroid Palette è stato concepito come unità periferica peri più diffusi personal computers. 
Istogrammi, grafici, ed ogni altro tipo di elaborato può essere facilmente riprodotto nelle tonalità più sature e 
brillanti, grazie ad una scala cromatica di ben 72 colori. Il tutto in tempo reale, operando sia con schermo mono¬ 
cromo che a colori. 

Il sistema Polaroid Palette utilizza, infatti, il segnale di uscita del computer stesso e consente elabora¬ 
zioni fotografiche a colori sia su positivo (hard copy) che in diapositiva Polaroid 35 mm. 

Il sistema minimizza quindi la ratinatura dello schermo, per una riproduzione fotografica accurata e 


definita. 


Il sistema Polaroid Palette è uno strumento di lavo¬ 
ro per operatori di marketing, per ricercatori, per tutti coloro 
che necessitano di un adeguato supporto visivo alle loro 
presentazioni. 


■ Polaroid 


"Polaroid” è un marchio registrato della Polaroid Corporation, Cambridge, Mass., USA. Polaroid 1984. 




























(^estanno Babbo Natale 
arriva dalla California... 







In ufficio, 

I personal computer della 
famiglia Apple //sono 
strumenti indispensabili 
per il lavoro. Qualunque 
sia la tua attività puoi 
migliorarla 

qualitativamente e con 
risparmio di tempo, se hai 
un Apple // 


...e ti invita ad un 

ia famigiia 


Apple Ile. 

Il sistema di elaborazione 
professionale che cresce 
con te, perchè la sua dote 
è l’espandibilità. 



Apple Ile. 

Un sistema completo in 
un design compatto: si 
installa in pochi minuti e 
si usa subito 
produttivamente. 




Apple ha diffuso la conoscenza 
del personal computer e, fin 
dai tempi del garage di Steve 
Jobs, costruisce solo personal 
computer: non si può certo 
mettere in discussione la sua 
esperienza e la sua capacità 
tecnologica! I sistemi di 
elaborazione Apple sono 
attualmente i più versatili; la 





Natale in famiglia: 
Apple II. 




A scuola. 

È già una realtà in nnolte 
classi rinsegnamento e lo 
studio con i personal 
computer. Apple // 
dispone di programmi 
didattici in gran numero. 



A casa. 

Hai mai desiderato avere 
in casa un personal? È il 
momento di farlo; un 
Apple //risolve ogni 
problema di calcolo, di 
archivio, di gestione per il 
lavoro in casa e stimola le 
capacità creative dei figli. 


linea di prodotti è in continua 
evoluzione, sia in termini di 
computer e periferiche 
(haidware) che di programmi 
disponibili (software). 

E poi una rete di assistenza a 
livello mondiale, garanzia di 
fiducia e qualità. 

Tutto questo, e molto di più, è 
Apple. 





Il software. 

Con i personal Apple // 
hai a tua disposizione la 
più vasta biblioteca di 
programmi applicativi, più 
di 20.000 in tutto il 
mondo. Qualunque sia il 
tuo problema, Apple //ti 
offre una soluzione. 


I . 











Apple Ile: 


Apple //e è il personal computer più 
versatile che tu possa avere. Puoi 
cominciare con la struttura di base — 
memoria 64 Kbyte, tastiera 
professionale, segnale di uscita video a 
colori per collegarlo al tuo televisore, 
presa di connessione al registratore —e 
già sei pronto a cominciare. 

Poi, man mano che le tue esigenze 
crescono, puoi aumentare la 
configurazione del sistema con le 
periferiche che ti servono. 

Apple //e è facile da usare, grazie anche 
ai piacevoli programmi di 
autoapprendimento. 

Come usarlo. 

Adopera Apple //e per semplificare la 
procedura della tua contabilità, per 
stilare le relazioni, per archiviare i tuoi 
documenti, per sviluppare gli aspetti più 
tecnici della tua professione. Apple He 


incorpora ben 8 connettori di 
espansione, cioè 8 prese di 
allacciamento per altre 
apparecchiature; in armonia con le tue 
necessità puoi ad esempio aggiungere 
altri microprocessori, schede di 
espansione della memoria, robot e 
braccia robotizzate, stampanti. 

Oppure il Mouse, per usare il tuo Apple 
//eancora più semplicemente, con un 
dito. E se le 8 prese in dotazione 
ancora non bastassero, puoi 
aggiungere scatole di espansione con 
connettori addizionali. 

Il software. 

Qualunque sia la tua attività, Apple He 
dispone del programma adatto, a 
cominciare dall’elaborazione dei testi o 
l’archiviazione di informazioni, fino ad 
applicazioni più specialistiche, come la 
gestione delle cartelle cliniche. 




Appi* U 
























o^i cosa a suo tempo. 


Consulta le Pagine del Software dal 
rivenditore Apple e puoi rendertene 
conto da solo. 

A scuola. 

Apple //e dispone di un elevato numero 
di programmi didattici, come 
AppleLogo, un semplice ma 
potente linguaggio riconosciuto 
universalmente quale strumento ideale 
per la scuola, sia per principianti che 
per esperti. Apple //e può inoltre essere 
integrato con qualsiasi accessorio, 
dalla tastiera musicale agli strumenti di 
controllo per gli strumenti scientifici. 


— Display video: 24 linee, con 40 
caratteri per linea (80 opzionale). 

— Grafica a bassa risoluzione: 40 x 48 
puntini (40 x 40 con 4 linee di testo) 
con 16 colori possibili. 

— Grafica ad alta risoluzione: 
Risoluzione 280 x 192 bianco/nero 
(oppure 280 x 160 con 4 righe di 
testo), 6 colori: nero, bianco, violetto, 
verde, blu, arancio (risoluzione a 
colori: 140 X 192 oppure 160). 

— Uscita Video monocolore: Standard. 

— Uscita Video Composito a colori: 
Standard. 


— Uscita RGB: opziorrale. 

— Altoparlante inserito: Standard. 
L’audio è regolabile sia in frequenza 
che in suono. 

— Jack audio esterno: Standard. 
L’audio è regolabile sia in frequenza 
che in suono. 

— Memoria di massa: interfaccia per 
cassetta. 

— Memorie di massa opzionali: più 
Disk //da 143 Kbyte, Duodisk da 
280 Kbyte, ProFile da 5 megabyte. 

— Peso: 5Kg. 



Dati, tecnici 

— Processore: 6502B. 

— Memoria disponibile: Minimo 64K 
byte RAM 16K ROM 

— Sistema Operativo: DOS 3.3, 
ProDOS, UCSD Pascal. 

— Linguaggi: Integer BASIC, Applesoft 
BASIC, FORTRAN, Pascal, 
Assembler, AppleLogo, SuperPILOT. 

— Tastiera: Tastiera ASCII Italiana - 63 
tasti, minuscole, maiuscole, auto 
ripetizione, 4 tasti di controllo del 
cursore. 









Apple Ile: 


Se vuoi avere subito a tua disposizione 
tutta la potenza di un computer 
professionale, per te c’è Apple He, il 
personal dalla configurazione già 
completa. In questo nuovissimo 
computer sono racchiuse tutta la 
versatilità e tutta la potenza della 
famiglia Apple // 

Apple He è compatto. Nelle sue piccole 
dimensioni — solo cm. 30x29x6! — 
incorpora tutto ciò che ti serve: 


memoria 128 Kbyte, unità disco, 
tastiera, grafica a colori. Tutto questo su 
Apple He è standard, cioè è compreso 
nel prezzo! 

Come usarlo. 

Coraggio, trova un monitor o un 
televisore, collega il tuo Apple He e 
mettiti subito al lavoro. Sarà 
lo stesso Head introdurti ai principali 
tipi di software ed alla programmazione 



in Logo ed in BASIC, con il corso 
“Apple presenta Apple Hd\ 
comprendente 6 programmi ed il 
materiale di apprendimento. 

Hai bisogno di una stampante, del 
mouse 0 di una unità a disco 
aggiuntiva? Apple He ha sul retro ben 6 
connettori per collegare — senza 
ulteriori costi —una vasta gamma di 
periferiche: mouse, Joystick, modem e 
accoppiatore acustico telefonico, visore 
a pannello piatto e televisore, monitor, 
unità a disco esterna, stampanti e 
plotter. Senza mai intervenire aH’interno 
del computer. 

Il software. 

Apple //c utilizza la maggior parte dei 
programmi realizzati per la famiglia 
Apple // Questo significa che puoi 
realizzare archivi, verificare situazioni 
finanziarie, gestire la contabilità 
generale; puoi usufruire di programmi 
per applicazioni più potenti. Ad 
esempio AppleWorks, il nuovissimo 
pacchetto di software integrato che 
riunisce i tre programmi più utilizzati: 
elaborazione testi, fogli elettronici di 
calcolo, archiviazione delle 
informazioni. Puoi disporre di 
programmi per applicazioni più 
specialistiche, come bancarie, mediche, 
legali, scientifiche. 

In ufficio. 

Apple He è lo strumento di 
lavoro più completo che tu possa 
avere. Oltre alla ricchezza del 
software di cui dispone, il //soffre 
il grosso vantaggio di potersi 
collegare con ogni tipo di 
“ambiente”: nessun problema di 
^ comunicazione con mainframe, 
banche dati esterne, o con 
, colleghi che — ahimè — non 
hanno un Apple! 




































tutto e subito! 



A casa. 

Se ti capita di dover portare il 
lavoro a casa, Apple He per te è 
insostituibile! Lo prendi per la maniglia, 
lo porti dove vuoi, lo colleghi in modo 
semplice e veloce. Attento, però, a chi ti 
circonda! I ragazzi scoprpno subito di 
essere bravi quanto te: cominciano 
giocando con “Lemonade” e finiscono 
col requisirti il personal per preparare 
la relazione di scienze. Mentre tu 
aspetti di poter calcolare le rate del 
mutuo... 

Dati tecnici 

— Microprocessore 65C02 

— 128 Kbyte di memoria RAM 

— 16 Kbyte di memoria ROM 

— Applesoft BASIC in ROM 

— Disassemblatore e programma 
Monitor in ROM 

— Unità disco da 5” e 1 /4 da 143 
Kbyte 

~ Connettore per una seconda unità 
disco incorporata 

— Tastiera con 63 tasti con maiuscole 
e minuscole 

— Visualizzazione di 80 caratteri per 
riga 


— Altoparlante incorporato con presa 
per cuffie e regolazione del volume 

— Connettore per 
Mouse/Manopole/Joystick 

— Modulatore Pai 

— Connettore seriale per stampante 

— Connettore seriale per modem 

— Grafica a 16 colori 

— Altissima risoluzione (590x192 punti) 

— Peso 3,5 Kg 

— Misure 30x29x6 cm 



Linguaggi disponibili 

— Applesoft BASIC (incorporato) 

— Pascal 

— SuperPILOT 

— Logo 

— Assembler 65C02 

Sistemi operativi 

— ProDOS 

— DOS 3.3 

— Pascal 








Apple He o Apple Ile? 
A te la scelta. 


Non è una scelta facile, lo sappiamo. 

Da una parte la tradizione di Apple He, 
dall’altra l’attualità e la potenza di Apple 
He, da una parte l’espansione graduale, 
dall’altra la compattezza di un sistema 
già completo e trasportabile. 

In entrambi i casi la versatilità, la 
produttività, la ricchezza di software 
applicativo — oltre 20.000 programmi in 
tutto il mondo — caratteristiche di tutti i 
personal della famiglia Apple // 

Per sciogliere ogni dubbio l’unica cosa 
che puoi fare è considerare 
attentamente le tue esigenze e fare 
quattro chiacchiere con un rivenditore 



Apple. Potrai vedere la famiglia Apple // 
al lavoro, e confrontare così le 
caratteristiche tecniche. 

Al momento di valutare i prezzi, non 
dimenticare che spendere qualche 
cosa in più significa avere a tua 
disposizione 128 Kbyte di memoria. 
Subito! 

E poi... sorpresa finale: se decidi di 
acquistare entro Natale Apple He, il 
monitor e il suo supporto, anche la 
stampante Scribe viene via con te o, se 
preferisci, l’intero pacchetto di software 
AppleWorks (vale mezzo milione!). 



La Apple si riserva il diritto di cambiare le specifiche del prodotto in qualsiasi momento e senza preavviso. I marchi Apple, 

Apple Computer, il simbolo Apple, ProFile sono marchi registrati delia Apple Computer ine. AppleWorks è un marchio registrato 
Apple. AppleLOGO è un prodotto Edizioni Logo Computer System Ine. e Apple Computer Ine. 


INNOVAZIONE 





















PER IL TUO APPLE // 


Vi piacciono le regate? O preferite esplorare le caverne dell’Olimpo? Oppure vorreste 
avere sul vostro schermo il fantastico gioco della scimmia che scappa arrampicandosi sulle 
pareti lisce di un grattacielo? Siete invece tipi riflessivi e vi dilettate di musica? Non 
preoccupatevi, qui c’è sicuramente quello che fa per voi. Per gli amanti di tanti giochi tutti 
insieme è disponibile una raccolta. Per chi, infine, vuole migliorare le proprie capacità di 
programmatore, ecco tutti i trucchi del Basic su dischetto. E a prezzi eccezionali. 



REGATTA. Un gioco entusiasmante che farà 
impazzire marinai esperti e meno esperti di 
qualunque età. Ogni concorrente ha a 
disposizione una barca e un circuito. Poi ci 
sono i venti, gli ostacoli, gli imprevisti... Una 
grafica realistica vi farà volare tra le onde. 
Paddle o Joystick opzionali. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 


CAVES OF OLYMPUS. Oltre a una grafica a 
colori ultraprofessionale, questo gioco di 
abilità sfodera suoni ed effetti speciali di 
qualità nettamente superiore. Divertente, 
intrigante e irresistibile. Non richiede né 
paddle né joystick. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 


APPLE ESCAPE. Una scimmia è fuggita dallo 
zoo e si arrampica sulle finestre di un 
grattacielo. Elicotteri le ronzano attorno e il 
guardiano dello zoo la insegue. Riuscirà a 
raggiungere il tetto e la libertà? Tutto dipende 
da quanto abili siete. Grafica a colo ri. Non 
richiede né paddle né joystick. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 



MUSIC GAMES. 12 programmi educativi e 
divertenti sul filo delle 7 note. Senza bisogno 
d’altro, il vostro Apple si tramuterà in un 
docile strumento musicale dal quale 
imparare e col quale divertirsi. Sono richieste 
le paddle o il joystick. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 


APPLE GAMES. 11 giochi: Flip-Flop, 
Mastermind, Towers, Sherlock’s home, 
AttackofthèZargons, Phaser Practice, 
Acey-Ducey, Big government, Tic-Tac-Toe, 
Qubic, Depth charge. E tre programmi di 
utilità; Shapetablegenerator, Opening 
ceremonies. Master catalog. Per alcuni 
giochi sono richieste le paddle o il joystick. 
Dischetto con programma e manuale in 
elegante confezione a 50.000 lire. 


BASIC TRICKS FOR THE APPLE. 35 routine 
che renderanno molto più professionali i 
vostri programmi in Basic e che vi sarà 
facilissimo imparare utilizzando il manuale e 
il dischetto offerti in elegante confezione a 
sole 50.000 lire. 


K 


Cognome e nome. 

Via.N. 

Gap.Città .Provincia. 

Scelgo la seguente formula di pagamento: 

□ Allego assegno non trasferibile di lire.intestato a Editronica srl, 

Corso Monforte 39, 20122 Milano 

□ Allego ricevuta di versamento di lire.sul conto corrente postale 

n. 19740208, intestato a Editronica srl. Corso Monforte 39, 20122 Milano 


Sì! Inviatemi subito, senza aggravio di spese 
postali, il 0 i programmi contrassegnati con 
una crocetta. 

□ REGAHA. 40.000 lire. 

□ CAVES OF OLYMPUS. 40.000 lire. 

□ APPLE ESCAPE. 40.000 lire. 

□ MUSIC GAMES. 40.000 lire. 

□ APPLE GAMES. 50.000 lire. 

□ BASIC TRICKS FOR THE APPLE. 

50.000 lire. 


Data 


Firma 





































WINNERS 


PORTE APERTE 

AL MICROTECH PROSHOP 

il primo negozio di computer 

specializzato 

per manager e professionisti. 



^cippk* computer 


























^ Il dubbio a volte è proprio amletico: nella versione 1.7 
< 0 ^ del tal programma avete introdotto 

una variante alie righe 2090 e 3020. 

O erano le righe 2020 e 3090? Per saperlo subito e senza errori, basta... 


È uguale 
o non è uguale? 


S i usano spesso programmi pubbli¬ 
cati sulle riviste, e quasi sempre si 
constata che manca qualche piccolo (e 
talvolta grande) pezzo atto a rendere il 


programma stesso più utile per i nostri 
scopi. Dopo aver fatto modifiche o ag¬ 
giunte, occorre però controllare le va¬ 
riazioni apportate. Purtroppo è diffici¬ 


le ricordarsele tutte: quali linee e quali 
parti di quali subroutine sono state 
cambiate, e come queste variazioni in¬ 
fluiscono su altre sezioni del program- 


Listato 1 


1 REM »«<««««<«««««««««««««««««» 

2 REM * CONFRONTO * 

3 REM * BY * 

4 REM * C^WRLES G. BOOOY « 

5 REM * COPYRIGHT (C) 1984 * 

6 REM » BYAPPLIC^DO & * 

7 REM « MICRO-SPARC INC. » 

8 REM «««««««<«««««««<«««««««««« 

20 REM »» LA LUNGHEZZA DELLA LINEA DI PROGimiA DA 
30 REM «« ST^VIPARE SU UN'UNICA LINEA E' 

40 REM IMPOSTATA DA LL NELL'ISTRUZIONE 
50 REM H QUI SOTTO 

éO LL = 50 

70 TEXT ; HOME ; VTAB 5 
80 f^FILES = 4 
90 REM 

100 REM « INTODUCETE I NOMI DEI FILE DA 

no REM « CONFRONTARE-DEVONO ESSERE FILE DI TESTO 

120 REM « CREATI CON L'EXEC DI CATTURA.A 

130 REM »» DATE UN NOME DIVERSO AL FILE 

140 REM CONTENENTE I Ci!V1BI^ENTI 

150 D$ = CHR$ (4): PRINT 'NOME DEL FILE DI 

TESTO DEL VECCHIO": INPUT "PROGRAltlA; ";0$: PRINT : PRINT 
•NOME DEL FILE DI TESTO DEL NUOVO": INPUT "PROGR^: •;N$ 
160 VTAB 12: PRINT."VUOI AVERE UN FILE 
DI TESTO DEI": PRINT "C^BIAMENTI? 

(1=SI, 0=NO)": INPUT "-PREMI RETURN 
•iCIC': IF CKX < >0 ^^D CKX < > 

1 THEN PRINT CHR$ (7);: GOTO 170 
170 IF CKX = 1 THEN INPUT 

•NOME DEL FILE DI TESTO : •;C$: PRINT D$;"0PEN"; 

C$: PRINT DI;"DELETE";C$: PRINT D$;"0PEN";CI 
180 GOSUB 1080; REM ST^P^E ATTIVATA 

190 ONERR GOTO 770 
200 GOTO 450 


210 REM 

220 REM «« RICEVE L'ISTRUZIONE DAL 
230 REM M "VECCHIO" FILE 
240 REM 

250 0S$ = ••; PRINT D$;"READ "jOI 

260 6ET A$; IF Af < ) CHR$ (13) OR LEN <0S$) = 

■ 0 THEN IF LEN (0S$) < 2 
55 THEN 0S$ = OSI + Al; GOTO 260 
270 PRINT ; RETURN 
280 REM 

290 REM RICEVE L'ISTRUZIONE DAL 

300 REM »» 'NUOVO" FILE 

310 REM 

320 NSI = ••: PRINT DI;"READ "jNI 

330 GET Al; IF Al < > CHRI (13) OR LEN (NSI) = 

0 THEN IF LEN (NSI) < 255 THEN NSI = NSI + Al: GOTO 330 
340 PRINT : RHURN 
350 REM 

360 REM ** ST^PA UN'ISTRUZIONE 

370 REM IN \m LINEA DELLA LUNGHEZZA DI LL 

380 REM 

390 II = 0 

400 IO = II 4 1;II = II 4 LL: PRINT TAB( 12); 

MIDI (JI,I0,LL): IF II < LEN 
(Jl) THEN 400 
410 RETURN 
420 REM 

430 REM «« LOOP PROGR^ PRINCIPALE 
440 REM 

450 PRINT DI;"0PEN "01; PRINT DI;"0PEN "jNI 
460 GOSUB 250: GOSUB 320 
470 REM 

480 REM SE IL NUMERO DELL'ISTRUZIONE E 
490 REM »« IL CONTENUTO SONO UGALI, LI IGNORA 
500 REM 

Continua 
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CHI MMM 

um? 


Ecco i libri che avete 
sempre cercato dalla più 
grande casa editrice del 
mondo: la McGraw-Hill. 

Tutto quello che dovete 
sapere per utilizzare 
meglio il vostro personal 
computer Apple 

Introducing thè Macintosh di 

Charles B. Duff. Una descrizione 
completa del computer che ha 
rivoluzionato il mondo dei 
personal, le applicazioni, il 
software e una sezione per i 
programmatori. 195 pagine. Lire 
41.000. Cod.MI 





li Basic Appiesoft di H . Mullish e 
D. Kruger. Perchi comincia, ecco 
una guida pratica all’Applesoft che 
conduce per mano fino alla 
programmazione strutturata. 232 
pagine. Lire 19.000 in itaiiano 





Using MacWrite e MacPaint di 

Tim Field. Un libro indispensabile e 
pieno di idee per chi vuole imparare 
tutte le possibilità’ di questi due 
straordinari programmi. 200 

pagine. Lire 33.000. Cod.M3 


Apple Backpack di Scot Kamins e 
Mitchell Waite. Tutto su come 
realizzare programmi user friendly, 
con controlli a prova d’errore. 182 

pagine. Lire 43.000. Cod.M4 


68000 Assembly Language 
Programming di Gery Kane, Doug 
Hawkins, Lance A. Leventhal. 
Presenta e spiega una per una tutte 
le istruzioni del 68000. 600 
pagine. Lire 50.000. Cod.M5 











THC OSeQRNE/ì>4cGftAW-HMI GUWPg TP VOUR 

Apple IH 



Apple ///di Stanley M. 
Miastkowski. Tutte le informazioni 
necessarie per superare ogni 
problema d’uso dell’Apple ///. 276 

pagine. Lire 48.000. Cod.lVI6 



VisiCaic Home and Office 
Companiondi David M. Castlewitz 
e Lawrence Chisausky. Modelli 
pronti per investimenti, pubblicità, 
vendite, personale inventari per il 
VisiCaic. 280 pagine. Lire 42.000. 
Cod.M7 


Science and Engineering 
Programs di John Hellborn. 46 
programmi pertermodinamica, 
equazioni lineari, differenziali, 
analisi strutturate, serie di Fourier, 
ecc. 226 pagine. Lire 43.000. 
Cod.MO 


Hands-On-Basic di Herbert 
Peckham. Esperienza pratica sul 
computer con attività guidate. 320 

pagine. Lire 58.000. Cod.MO 



VisiCaic 


M Q D E L S 

• i-'iTMuicc ■ • MdUiOiMtiCi. 

_ À 




The Smeli 

Ccxnpater 

Connection 

TELECCWn/MUNICATJCMSIS 
FCDR THE HOME & OFFICE 


68000 

Microprocessor 

Handbook 



54 VisiCaic Models di Robert H. 
Flast. Investimenti, mutui, tasse, e 
un’altra trentina di problemi 
statistici e matematici risolti da 
questa collezione di modelli per 
VisiCaic. 280 pagine. Lire 42.000. 
Cod.MIO 


Logo Por The Apple// di H. 

Adelson. Tutto sul Logo, il nuovo 
linguaggio facile da usare, 
utilissimo agli adulti che vogliono 
insegnare ai bambini. 228 pagine. 
Lire 48.000. Cod.M11 


The Smail Computer Connection 

di Neil L. Shapiro. Passo per 
passo, come collegare il vostro 
Apple al mondo esterno per 
accedere alle banche dati. 190 

pagine. Lire 48.000. Cod.M12 


68000 Microprocessor Handbook 

diGerryKane. Conoscerei! 
microprocessore di Lisa e di 
Macintosh. 120 pagine. Lire 
28.000. Cod.M13 


>1 


inviatemi, senza aggravio di spese postali, 
i seguenti volumi (barrare la casella 
in corrispondenza del codice prescelto 


Cognome e nome . 

Via. 

Cap.Città 


Prov, 


N 


□ M1 Introducing thè Macintosh 

□ M2 II Basic Applesoft 

□ M3 Using MacWrite e MacPaint 

□ M4 Apple Backpack 

□ M5 68000Assembly Language Programming 

□ M6 Apple/// 

□ M7 Visicalc Home and Office Companion 

□ M8 Science and Engineering Programs 

□ M9 Hands-On-Basic 

□ M10 54 Visicalc Models 

□ M11 Logo for thè Apple// 

□ M12 The Small Computer Connection 

□ M13 68000 Microprocessor Handbook 


□ Allego assegno non trasferibile di lire.intestato a EDITRONICA srl. 

□ Allego ricevuta di versamento di lire.sul c/c postale N. 19740208 

intestato a Editronica Srl, Corso Monforte 39,20122 Milano. 

□Pago fin d’ora lire.con la mia carta di credito 

BankAmericard N.scadenza. 

autorizzando la Banca d’America e d’Italia ad addebitare l’importo sul mio conto BankAmericard. 

Data.Firma.. 

□ Desidero fattura. Il mioCod.Fisc./Part.lVAè. 


Ritagliare e spedire a: Editronica Srl, Corso Monforte 39,20122 Milano 
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510 OS = VAL (0S$);NS = WL (NS$): IF VAL mi) = VAL (NS$) 0S$ = NS 


i THEN 460 


520 

REM 



530 

REM 

« SE IL NUMERO DELL'ISTRUZIONE E' UGUALE m 


540 

REM 

»» NON IL CONTENirrO, ST^PA 'C^BIATA' 


550 

REM 

E RICEVE m NUOVA ISTRUZIONE 


560 

REM 



570 

IF VAL (0S$) = LWL (NS$) 0S$ < > NS^ THEN PRIMI 

'CODIATA'; PRINT 


TAB( 

5); VAL (0S$);;J$ = 0S$; GOSUB 390; PRINT 'IN:': 

PRINT TAB( 5); VAL 


(NS$)i 

i;J$ = NS$; GOSUB 390; GOSUB 870; GOTO 460 


580 

REM 



590 

REM 

« SE IL VECCHIO NUMERO DI ISTRUZIONE E' < DI QUELLO NUOVO 

600 

REM 

« ALLORA LA VECCHIA LINEA E' STATA CESELLATA. 


610 

REM 

*« STIPALO E CONTINUA. 


620 

REM 



630 

IF m <0S») < (WL <NS») THEN PRINT 'MNCELLATA': PRINT TABI SIpJ» 


= 0S$; GOSUB 390: GOSUB 250; GOSUB 960: BOTO 510 


640 

REM 



650 

REM 

IN CASO CONTRARIO 


660 

REM 

»» E' STATA AGGIUNTA m NUOVA LINEA. 


670 

REM 

« STIPALO E PROSEGUI. 


680 

REM 



690 

PRINT 

'AGGIUNTA '; PRINT TAB( 5); VAL (NS$);;J^ = NS$; 

GOSUB 390: GOSUB 


320; GOSUB 870; GOTO 510 


700 

REM 



710 

REM 

»* QUmDO UN FILE E' VUOTO 


720 

REM 

« DETERMirW COSA E' 


730 

REM 

« STATO AGGIUNTO 


740 

REM 

E COSE E' STATO 


750 

REM 

»« (>¥^CELLAT0 


760 

REM 



770 ] 

< = PEEK (218) 4 PEEK (219) « 256; POKE 216,0; ONERR 

GOTO 1030 

780 

IF X ) 310 THEN 800 


790 

PRINT 

'AGGIUNTA': GOSUB 320;J$ = NS$; GOSUB 390: GOSUB 870; GOTO 790 

800 

IF VAL (0S$) < ) NS THEN PRINT "C^CELLATA;";J$ = 0S$: GOSUB 390 

810 

PRINT 

'CANCELL/tTA': 60SUB 2S0;J) = DS$: GOSUB 390; GOSUB 960: GOTO BID 

820 

REM 



830 

REM 

« SE SI STA CRE/V^DO UN FILE EXEC 


840 

REM 

w CONSERVA 


860 

REM 



870 

IF CKX = 0 THEN RETURN 


880 

PRINT D$;'URITE ';C$; PRINT J$ 


890 

PRINT 



900 

PRINT D$;'READ';C$; RETURN 


910 

REM 



920 

REM 

« SE SI STA CRENDO UN FILE EXEC 


930 

REM 

« E L'ISTRUZIONE E' CANCELLATA 


940 

REM 

CONSERVA IL NUMERO DELL'ISTRUZIONE 


950 

REM 



960 

IF CKX = 0 THEN RETURN 


970 

PRINT Mj'URITE •;C$; PRINT ‘^L (J$) 


980 

PRINT l)$;'READ';C$; RETURN 


990 

REM 



1000 

REM 

« RAGGIUNTA LA FINE DI ENTR^BI I FILE 


1010 

REM 

»» IL PROGim^ TERMir^ 


1020 

REM 



1030 

PRINT : PRINT 'FINE DEL CCNFRONTO’: PRINT Mi'CLOSE": 

GOSUB 1090 

1040 

END 



1050 

REM 



1060 

REM 

««ATTIVAZIONE E DISATTh^ZIONE ST^P^E 


1070 

REM 



1080 

PRINT D$;'PR#r; RETURN 


1090 

PRINT D$;'PR#0'; RETURN 



ma. Inoltre capita sempre di avere alla 
fine più versioni dello stesso program¬ 
ma, con variazioni così minime da ren¬ 
dere difficoltosa l’identificazione. 
Questo programma esegue in automa¬ 
tico un lavoro di comparazione utilissi¬ 
mo nel caso citato, ma evidentemente 
utilissimo anche quando si sta lavoran¬ 
do per propio conto a un programma 
del tutto nuovo, per le stesse ragioni 
esposte sopra. 

Il Programma 

Dovete innanzitutto copiare e salva¬ 
re sullo stesso dischetto i programmi 
CONFRONTO e CATTURA. Fate 
poi una copia come file di testo dei 
programmi che desiderate confronta¬ 
re (non più di due alla volta, natural¬ 
mente). Per ottenere questo, date il 
RUN a CATTURA: viene creato così 
un file di testo denominato CATTU¬ 
RA. A di cui si può fare l’EXEC. Cari¬ 
cate in memoria con LO AD il primo 
dei due programmi che volete con¬ 
frontare, quindi fate EXEC CATTU- 
RA.A. Il comando EXEC CATTU¬ 
RA. A aggiungerà CATTURA come 
linea 63999 al vostro programma in 
Applesoft. Se nel programma ci sono 
già linee con questi numeri, sarà ne¬ 
cessario rinumerarle prima di eseguire 
con EXEC il programma CAT- 
TURA.A. 

Una volta fatto l’EXEC di CATTU¬ 
RA. A, il comando RUN 63999 forni¬ 
sce i prompt per dare un nome al file di 
testo che ci accingiamo a creare e poi 
per creare il file di testo. 

Fate attenzione a NON dare al file 
di testo lo stesso nome del program¬ 
ma, perché in tal caso si incorre sicura¬ 
mente in qualche problema e si rischia 
di ricevere un errore di FILE TYPE 
MISMATCH, o peggio si può perdere 
il programma! Se il programma è mol¬ 
to grande, dovete salvare il file di testo 
su un dischetto vuoto, poiché esso sarà 
molto lungo (un programma di 65 set¬ 
tori convertito in file di testo è lungo 
95 settori). 

Seguite poi la stessa procedura con 
il secondo dei due programmi da con¬ 
frontare. 

Confronto 

Una volta creati i files di testo op¬ 
portunamente nominati per i due pro¬ 
grammi che occorre confrontare, il co¬ 
mando RUN CONFRONTO produce 
un listato che mostra ogni istruzione 
cambiata, ogni istruzione cancellata e 
ogni istruzione aggiunta. Nei casi in 
cui un’istruzione è stata cambiata, 
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1 

REM 


2 

REM 

« 

CATTURA « 

3 

REM 

« 

BY CHARLES BOODY ♦ 

4 

REM 

« C0PYRI6HI <C) 1984 » 

5 

REM 

« 

BY applii:y»(oo 4 * 

6 

REM 

« 

HICRO-SPARC INC. » 

7 

REM 



10 W = CHW (4);A$ = •CATTURA.A": PRIMI W;*OPEN-|A$; PRIMI D$-WRIIE •; 

A$:POKE 33,30; LISI 63999; PRIMI D$;"CLOSE';A$; TEXT 
20 PRIMI W;-LOCK-;A$ 

30 EMD 

63999 0$ = CHR$ (4); IMPUI "MONE DEL FILE DI lESIO; 

•;A$; PRIMI D$;'OPEM-;A 

$; PRIMI D$-WRITE ";A$; POKE 33,30; LIST 0,63998; PRIMI D$; 
•CLOSE-;A$; TEXI ; EMD 

Listato 2 


vengono stampate sia la vecchia sia la 
nuova versione, con opportune osser¬ 
vazioni DA e A. Se vi serve, potete 
creare un file di testo battendo EXEC: 
sarà utilissimo per aggiornare le prece¬ 
denti versioni. 

Limiti 

Esistono alcune limitazioni nel pro¬ 
gramma che potrebbero causare pic¬ 
cole difficoltà all’utente. L’inclusione 
in un programma di alcuni caratteri 
speciali di controllo può provocare 
problemi alla stampante. 

Una linea di programma contenente 
più di 255 caratteri viene spezzata in 
due linee. Normalmente questo non 
rappresenta un problema, ma se per 
caso il punto di rottura fosse seguito 
immediatamente da un numero mag¬ 
giore del numero di linea corrente- 
mente elaborato, l’output potrebbe 
essere sconvolto. 

Per concludere, le due versioni del 
programma devono anzitutto aver 
avuto numerazione analoga (per i nu¬ 
meri di linea), altrimenti i risultati, per 
quanto esatti, saranno piuttosto privi 
di costrutto. 

E possibile adattare il programma 
alle proprie stampanti, e le routine di 


accensione e spegnimento di queste 
sono chiaramente contrassegnate nel¬ 
la parte finale del listao 1. 

Un altro cambiamento possibile è 
indicato da un’istruzione REM: la va¬ 
riabile LL che controlla la lunghezza 
della linea stampata. 

Ci sono molti altri impieghi utili dei 
programmi CONFRONTA e CAT¬ 


TURA. E’ possibile introdurre modi¬ 
fiche a un programma apparso in una 
rivista, usare CATTURA per trasfor¬ 
mare le modifiche in un file di testo ed 
eseguire con EXEC quel file di testo 
per mettere i cambiamenti nel pro¬ 
gramma originale senza dover fare la 
consueta laboriosa ricerca delle linee e 
dover fare le modifiche a una a una. 
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Fadk 


CALCOLARE... 


E facile con MULTIPLAN. 

Questo programma per la gestione del 
“foglio elettronico” trasforma il vostro 
personal computer in un prestigioso cal¬ 
colatore che utilizzerete senza problemi. 
Istruzioni, comandi e ampia documenta¬ 
zione. 

Incolonnamento variabile. 
Indirizzamento relativo o assoluto. Tutto 
facilita il lavoro. Completo di guida mol¬ 
to chiara che potete far apparire, a richie¬ 
sta, sullo schermo. 


MODIFICARE... 


Desiderate cambiare dei parametri? Mul- 
tiplan ricalcola automaticamente tutto 
ciò che ne deriva. La medesima cosa su 
più fogli di calcolo che potrete legare tra 
loro a volontà. Integrando funzioni logi¬ 
che, funzioni statistiche Multiplan si rive¬ 
la il “foglio elettronico” più potente sul 
mercato. 


DECIDERE... 


Con Multiplan avrete sotto gli occhi tutte 
le cifre per prendere decisioni oggettive. 
Eletto programma dell’anno, già uno dei 
best-sellers mondiali del 1983, Multiplan, 
è ora disponibile in Italiano. 


con Multiplan 


MICROSOFT 



DISTRIBUITO IN ITALIA 

esclusivamente da 


'é.SOft 


EDITRICE 


20124 Milano - Via Rosellini, 12 
Tel. (02) 6888228-683797-6880841/2/3 


Potete acquistare Multiplan - edizione 
italiana - presso i migliori rivenditori Ap¬ 
ple o riceverlo direttamente da i.soft, 
compilando ed inviando il coupon sotto 
riportato. 


il software che ti rende 
facile la vita. 




^moosizio»!! 


i Entrate 


5000000 


—terazione 


petetoro 

"ÌLuce 
^ 9 ^ Auto 

lójyqr^g 

^T^Usctte 

13 


300000 

2000000 

150000^ 

"TÓóóóo^ 
■ ' 500000 
2000.00 


- rl^ronto 

5200®° ; I *28000 V ,2?'®°“ 

300000 .11 . ___ 


3250000 


30UUUU ......■ 

. «3popo_a..!!-..----^7 ,Z2« 


T^profttto 

"^^Accanton.. 


i U -—^ \zZ92lt 

^««oo'eV.s , ; ,228272. 

2,00000 ^«^^ ,3 ,8 .36936 3,64 
^>7nn00 . ^ ^ ^^ 


Inviare a J.soft, - Via Rosellini, 12 - 20124 Milano 


Nome .Cognome 


Ordino n°.Multiplan in italiano per Apple Ma¬ 

cintosh - cod. DMOPM02 al prezzo di L. 638.000 cad. 
(IVA e spese di spedizione incluse). 


Via ... 
C.A.P. 


.Città.Prov. 


Scelgo la seguente forma di pagamento: 

□ pagherò in contrassegno al postino 

□ assegno allegato di L. 


Desidero fattura - n° Partita IVA 
Data . Firma 

























c'è chi propone. 
J.soft dispone. 

Il “software di qualità” selezionato per gli utenti più esigenti. 




Fantasia; una “tavolozza" 
per disegnare, 

scrivere musica, animare sequenze di 
immagini, studiare la geometria. Un mezzo per 
apprendere l'utilizzo del personal computer. 


L’uscita: un labirinto di stanze da cui si esce 
solo con l'astuzia. Solo superando numerose 
difficoltà si potrà trascrivere il proprio nome 
nell’olimpo dei solutori. 


Golem Uno: un semplice linguaggio di 
programmazione utile per avvicinare questa 
affascinante materia in modo facile e 
divertente. Rappresenta la logica evoluzione di 
“Fantasia”. 



CFS: il programma per l’archiviazione 
elettronica delle informazioni che potranno in 
seguito essere visualizzate su video 
liberamente o secondo sofisticati criteri di 
selezione. Il primo programma italiano che 
può sfruttare l’utilizzo del “rnouse". 


Introduzione alla proarammazione: il 

software didattico che fornisce una guida 
all’apprendimento delle tecniche necessarie a 
risolvere un problema in forma algoritmica. 
Della stessa linea didattica: Programmazione 
in BASIC- Programmazione in Pascal - 
Impariamo la dattilografia - Esercizi di 
dattilografia. 



Per Macintosh: 



MacCFS: il programma italiano di 
archiviazione per gestire con semplicità ed 
efficacia qualunque tipo di informazione. 



Filevision: il potente e versatile data-base 
grafico che permette di ‘’vedere’’ in ogni 
istante le informazioni memorizzate. 
Corredato da ‘guida all’uso ” in italiano. 


Habadex: l’agenda elettronica personale per 
la pianificazione e la gestione di 
appuntamenti, riunioni, ricorrenze e impegni di 
qualsiasi tipo. Versione italiana. 


Chart: oltre 40 tipi di grafici per visualizzare 
istantaneamente dati numerici. Si possono 
utilizzare direttamente i dati generati da 



BASIC: il più diffuso linguaggio di 
programmazione, che nella versione per Apple 
Macintosh esalta tutte le sue potenzialità. 


Per qualsiasi informazione e per l’acquisto, 

rivolgetevi ai migliori rivenditori Apple della vostra zona. 


... e non dimenticatevi degli altri programmi ^.^ft 




















Ma 


Avvincente più di un giallo di Agatha Christie, questo gioco 
richiede prontezza di riflessi e rapidità di pensiero, 
non basta: se non siete ottimi strateghi, rinunciate in partenza 
alla sfida. E, soprattutto, fate in modo di avere il tempo 
necessario a disposizione, perché vi sarà 
impossibile piantare in asso una partita a metà. 


Trappola per pochi 


P otete scegliere per giocare un mas¬ 
simo di tre avversari, micidiali ani¬ 
mali che vi braccano, mentre cercate 
di intrappolarli tenendovi al tempo 
stesso fuori della loro portata. Il gioco 
ha tre livelli di difficoltà. 

Quando fate il RUN, una pagina 
d’intestazione mostra i tasti che dove¬ 
te adoperare per spostare sullo scher¬ 
mo il proprio pezzo. La tastiera viene 
trasformata in joystick scegliendo i ta¬ 
sti che attorniano la K, come mostra la 
figura 1. Premendo K si arresta il mo¬ 
vimento, O sposta il marcatore in alto 
sullo schermo, M lo sposta in basso a 
sinistra, e così via. Ci sarà un periodo 
di attesa mentre il programma viene 
predisposto, poi si scelgono le condi¬ 
zioni di gioco. Sullo schermo compare 
la tavola di gioco con gli ostacoli mobi¬ 
li. Il giocatore li può spingere qua e là, 
mentre gli animali non possono farlo. 
Compito del giocatore è quello di co¬ 
struire muri che circondino compieta- 
mente le belve. Il gioco finisce quando 
nessun animale è più in grado di spo¬ 
starsi (oppure il giocatore viene divo¬ 
rato!). 

Spiegazione del 
programma 

Gli ostacoli, le belve e il marcatore 
vengono scritti con comandi POKE 
nello schermo di testo. Quando si fa il 
RUN del gioco, le locazioni di scher¬ 
mo sono memorizzate nella matrice 
P%(J,I). Questo viene fatto nelle li¬ 
nee 300-330, ed è la ragione della pau¬ 
sa che precede la prima partita. Dopo 
che sono state collocate le bestie (in 
numero di DF) viene cercato un punto 


nel quale porre il proprio pezzo a una 
ragionevole distanza da ogni belva. 

Il programma principale ha inizio a 
linea 1000. Per prima cosa si fa ricorso 
a un metodo per la generazione di un 
seme casuale iniziale utilizzando la 
funzione RND (-qualcosa). La linea 
1000 provvede anche a una pausa che 
consente al giocatore di studiare la ta¬ 
vola di gioco e di fare un piano strate¬ 
gico. 

Al livello di difficoltà più elevato, 
tutte le belve hanno la possibilità di 
spostarsi ogni volta che lo fa il giocato¬ 
re. Ai livelli più bassi sono concesse al 


giocatore alcune mosse di vantaggio. 

Le linee 5000-5880 contengono le 
routine destinate a individuare la pres¬ 
sione di un tasto, a spostare il pezzo 
sulla tavola e a spingere gli ostacoli. 

Le linee 6000-6270 contengono la 
routine per lo spostamento delle bel¬ 
ve. Si trattava di trovare il modo di far 
seguire il giocatore dalla belva, ma 
non alla perfezione; l’animale doveva 
essere in grado di aggirare gli ostacoli, 
anche se questo fatto implicava un ar¬ 
retramento. Hl% e Vl% conservano 



Figura 1. 
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40 

41 

42 

43 

44 

45 

46 

97 

98 

99 


REM *««««««««««<*«««««««««««««»«*»)« 
RBi ** TRAPPOLA PER POCHI ♦» 
REM »* BY ROB SMYTHE *« 
RBI ♦* COPYRIGHT (C) 1984 BY *» 
REM ** APPLICANDO i MICRO-SPARC ** 
REM *♦ »* 
REM ******«*»*»**»**«***»*******»»** 

REM INTESTAZIOl^E E ISTRUZIONI 


100 

no 

HOME 

PRINT TAB( 

10): PLASH : PRINT 'TRAPPOLA PER 


POCHI': NORmL : PRINT : 

PRINT 'CATTURA LE 


BELVE PRIMA CHE TI PRENDANO!': PRINT 

: PRINT 

120 

PRINT TAB( 

11);: INVERSE 

: PRINT 'U'i 

1 : NORMAL 


: PRINT ' 

INVERSE 

: PRINT 'l'i 

;: NORmL 


: PRINT ' 

INVERSE 

: PRINT '0'; 

! NORMAL 

130 

PRINT TAB( 

12)' . . 


140 

PRINT TAB( 

12)' . . . 

PRINT 


150 

PRINT TAB( 

11);: IWERSE 

: PRINT 'J' 

: NORTttL 


: PRINT ■ 

';: INVERSE 

: PRINT 'K' 

: NORmL 


: PRINT ' 

';: INVERSE 

: PRINT 'L' 

NORMAL 

160 

170 

PRINT TAB( 
PRINT TAB( 

12)' . . . 

12)' . . , 

,': PRM 


180 

PRINT TAB( 

11);: INVERSE 

: PRINT 'M' 

: NORMAL 


: PRINT ' 

•;: INVERSE 

: PRINT ■(' 

: NORMAL 


: PRINT ' 

':: IPWERSE 

: PRINT ')' 

NORIWL 

190 

200 

PRINT 

PRINT : PRINT 'TU .... + 

*" 

LE BELVE 


210 


297 

298 


PRINT ! PRINT : PRINT 'RINCHIUDILE COMPLETPW 
ENTE PER VINCERE. MUOVI PREMENDO I TASTI IN 
DICATI SOPRA.' 

'rem RIEMPIE LA MATRICE ^ COT^ LOCAZIONI D 
I SCHERMO 


299 : 

300 DIM m2A,m 

310 POR 1 = 1 TO 40: POR J = 1 TO 8:F/(J,1) = 10 

23 + (J - 1) * 128 + I: NEXT J,I 

320 POR 1 = 1 TO 40: POR J = 9 TO Ì6:P:6(J,1) = 1 

063 MJ - 9) » 128 + I: NEXT J.I 

330 POR I = 1 TO 40: POR J = 17 TO 24:PX(J,I) = 
1103 + (J - 17) « 128 + 1: NEXT J,I 

397 : 

398 REM PREPAIW IL GIOCO 

399 • 

4Ò0 'nORIWL : INPW 'NUMERO DELLE BELVE (1,2, 03 
)? ')0P 

410 HOME : CALL - 868: INPUT 'LIVELLO DI DIPPIC 
OLTA' (1,2,3)? ':EA: IP EA ( > 1 ^VID EA ( > 
2 (¥(D EA ( ) 3 THEN 410 

420 HOME :TIME = 0:X = PRE (0) 

427 : 

428 REM COLLOCA GLI OSTACOLI 

429 : 

430 POR I = 1 TO 40: POKE PX(1,I),32: POKE PX(23 
,I),32: NEXT 

440 POR I = 2 TO 22: POKE PX(I,1),32: POKE PXd, 
40),32 

450 NEXT I 

460 POR I = 1 TO 200:AX = INT ( RND (1) » 38 + 
2):BX = INT ( RND (1) *21 + 2) 

470 POKE PX(BX,AX),24 

480 NEXT 


487 : 

488 REM COLLOCA LE BELVE 

489 : 

490 POR I = 1 TO DP 

500 V/d) = INT ( RND (1) * 21 + 2):H/(I) = INT 
( RND (1) *38 + 2): IP PEEK (P*/.(V/(I),HX(I 
))) ( ) 160 THB( 500 

510 POR J = 1 TO 20: POKE P‘/(V/(l)jH/(I)),160: POR 
K = 1 TO 20: NEXT K: POKE P’/(VX(l),HXd)),17 
0: POR K = 1 TO 20: NEXT K: NEXT J 
520 NEXT 1 

527 : 

528 REM COLLOCA IL GIOCATORE A RAGIONEVOLE DI 
ST/^ZA DA TUTTE LE. BELVE 

529 : 


530 VIX = INT ( RND (1) * 21 + 2):H1X = INT ( RND 
(1) * 38 + 2): IP PEEK (P'/(V1X,H1/)) ( ) 1 
60 THEN 530 

540 POR I = 1 TO DP:D(I) = (V/d) - VI/) ‘ 2 t ( 
H/d) - HI/) ‘ 2: NEXT 

550 POR I = 1 TO DP: IP Dd) ( 226 - 30 * (DP - 
1) THEN I = DP: NEXT : GOTO 530 
560 NEXT 

570 POR J = 1 TO 20: POKE P/(V1/,H1/),160: POR K 
= 1 TO 20: NEXT K: POKE P/(V1/,HÌ/),171: POR 
K = 1 TO 20: NEXT K: NEXT J 

997 : 

998 REM **** PROGfóm) PRINCIPALE **** 

999 : 

1000 X = PEEK ( - 16384):Y = RND ( - RND (D): 

IP X ( 128 THEN 1000 

1010 TIME = TIME + 1: HTAB 1: VTAB 23: IWERSE : 

PRINT 'TEMPO: ':: GOSUB 9000: PRINT TlMEf: 

1020 GOSUB 5000 
1030 COUNT/ = 0 
1040 POR N = 1 TO DP 

1050 IP N = DP (WD EA = 1 THEN GOSUB 5000 
1060 GOSUB 6000 

1070 IP N = 1 /¥^D (EA ( =2) THBl GOSUB 5000 
1080 NEXT 
1090 GOTO 1010 

4997 : 

4998 REM CONTROLLA SE E' STATO PREMUTO UN TAST 
0 

4999 : 

5000 IP EA = 3 THEN 5030 

5010 POR J = 1 TO 15:X = PEEK ( - 16384): IP X > 
127 THEN J = 15 
5020 NEXT J: GOTO 5040 
5030 X = PEEK ( - 16384) 

5040 IP X ( = 127 THEN RETURN 
5050 X<= CHI» (X): GOSUB 5100 
5060 RETURN 

5097 : 

5098 REM RICONOSCE IL TASTO PREMUTO 

5099 : 


5100 IP ASC (Xi) = 203 THEN 

5110 IP ASC (X$) = 201 THEN 

5120 IP ASC (Xf) = 202 THEN 

5130 IP ASC (X$) = 204 THEN 

.SJilL IP ASC (X$) = 172 THEN 

5150 IP ASC (XI) = 174 THEN 

5160 IP ASC (XI) = 205 THEN 


RETURN 

GOSUB 5300: RETURN 
GOSUB 5390: RETURN 
GOSUB 5480: RETURN 
GOSUB 5570: RETURN 
GOSUB 5660: RETURN 
GOSUB 5690: RETURN 


Continua 
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Applesoft For The //e di Brian D. 
Blackwood e George H. Blackwood. 
Scritto per l’Apple //e, presenta in 31 
lezioni tutte le tecniche di 
programmazione, con esempi pratici, e 
programmi in 80 colonne. 

Sams. Lire 40.000. Cod. LI 




Polishing Your Apple di Herbert M. 
Honig. Voi. 1 e Voi. 2. Una guida 
pratica e maneggevole per archiviare su 
disco e suggerimenti per menu 
d’aspetto professionale, error 
trapping, e routine. 

Sams. 182 pagine. Lire 20.000. Cod. L2 



Apple // For Kids From 8 to 80 di 

Michael Zabinski e Frank Mazzola. Un 
libro ricco di esercizi pratici, scritto con 
le tecniche con cui si insegna nei 
computer-camp americani, di cui 
Zabinski è stato il fondatore. 

Sams. 174 pagine. Lire 22.000. Cod.L4 


Apple Graphics Activities Handbook 

di Harold J. Bailey e J. Edward Kerlin. 
Tutte le tecniche di grafica bi e 
tridimensionale per Apple II e Apple//e. 
Con esempi ed esercizi. 

Prentice Hall. 422 pagine. Lire 
24.000. Cod.LS 


APPLE II 
APPLICATIONS 


MARVIN L D€ JONG 



Apple II Applications di Marvin L. De 
Jong. Una serie di tecniche di 
interfacciamento che consentono di 
utilizzare un Apple//come sistema di 
sviluppo 0 di controllo, o rilevatore di 
misure. 

Sams. Lire 32.000. Cod.LS 



Introducing The Apple //c di Philip 
Lieberman. Il miracoloso mondo 
dell’Apple//c. Tanti software ed 
accessori hardware nuovissimi. Tanti 
indirizzi per poter avere tutte le novità in 
breve tempo. 

Sams 400 pagine. Lire 36.000. Cod.LB 


The Apple Almanac-1001 useful 

thingsdiE.E. GoeeW.B. Sanders. 

1001 cose utili per chi ha appena 
iniziato a programmare, ma anche per 
chi sa già tutto sull’Apple//. 

Reston 240 pagine. Lire 40.000. 
Cod.L13 

Apple Basic Made Easy di David e 
Marianne Garden. Visita guidata per 
imparare in maniera nuova. Apple 
Basic. Completo di esercizi. 

Prentice-Hall 246 pagine. 

Lire 42.000. Cod. LI6 


Apple Graphics Games di Paul Coletta. 
Come trasformare l’Apple in una sala 
giochi. Tanti giochi in Applesoft, con 
effetti sonori e grafica ad alta 
risoluzione. 

Reston 218 pagine. Lire 30.000. 
Cod.L14 

Apple Logo Programming Primardi D. 

Martin, S. Pratae M.A. Paulsen. Una 
delle piu’ valide e importanti opere per 
imparare la programmazione Logo. 

Sams 454 pagine. Lire 40.000. 
Cod.L17 


Apple Programmer’s Handbook di 

Paul Irwin. Mappe di memoria, 
programmazione in Assembler, 
Applesoft, Integer BASIC, progetti di 
interfacce e tante informazioni. 

Sams 518 pagine. Lire 46.000. 
Cod.L15 

Apple//e Programmer’s Reference 
Guide di David L. Heiserman. Tutte le 
informazioni e le tabelle sempre a 
portata di mano. 

Sams 306 pagine. Lire 40.000. 
Cod.LIS 
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The Academic Apple di Richard Mowe. 
Una guida per genitori e insegnanti, per 
aiutare i bambini dai 5 anni in su ad 
imparare meglio grazie ad un Apple //. 
Un’ottima introduzione all’uso del 
computer. 

Reston. 162 pagine. Lire 18.000. 
Cod.L7 



Setter Basic Por The Apple di J . N . P. 

Nume e R.C. Holt. Tutto ciò che 
occorre per utilizzare con efficacia un 
Apple in ufficio o a casa è compreso in 
questo libro, ricco di programmi 
strutturati, facili da copiare. 

Reston. 286 pagine. Lire 42.000. Cod. LIO 



Disk, Files, And Printers Por The 
Apple // di Brian D. Blackwood e 
George H. Blackwo$. Per imparare a 
realizzare text files e hard copies su 
carta. Tutto sui comandi per disk drives 
e stampanti, con esempi pratici. 

Sams. 260 pagine. Lire 32.000. 
Cod.L8 



Basic Tricks Por The Apple di Alien 
Wyatt. Ecco i trucchi che permettono 
ancora più efficienza. 35 routine per 
l’allineamento dei numeri, la gestione 
delle date e degli orari, la creazione di 
menu professionali, ecc. 

Sams. 138 pagine. Lire 18.000. Cod. L11 




Using Apple Business Computers di 

Kenniston W. Lord, dr. CDP. Volete 
ammortizzare rapidamente 
l’investimento per il vostro Apple //? 
Questo libro spiega come usare con 
efficacia le procedure che rendono di 
più. 

VanNostrand. Lire 40.000. Cod.LO 


Applesoft Language di Brian D. 
Blackwood e George H. Blackwood. 
Sotto forma di lezioni (sono 29), 
questo manuale insegna il problem 
solving e il flow charting, oltre ai 
comandi per la grafica e il colore. 
Sams. Lire 28.000. Cod.L12 


Inviatemi senza aggravio di spese 
postali i seguenti volumi (barrare la 
casella in corrispondenza del codice): 


□ L1 Applesoft Por The//e 

□ L2 PolishingYourApple 

□ L3 Apple II Applications 

□ L4 Apple//PorKidsFromSto80 

□ L5 Apple Graphics 

Activities Handbook 

□ L6 Introducing thè Apple// 

□ L7 The Academic Apple 

□ L8 Disk, Piles, And Printers 

Por The Apple 


□ L9 Using Apple Business 

Computers 

□ L10 Better Basic Por The Apple 

□ L11 Basic Tricks Por The Apple 

□ L12 Applesoft Language 

□ L13 The Apple Almanac 

1001 usefulthings 

□ L14 Apple Graphics Games 

□ LI 5 Apple Programmer’s 

Handbook 

□ LI 6 Apple Basic Made Easy 

□ LI 7 Apple Logo 

Programming Primer 

□ LI 8 Apple//e Programmer’s 

Reference Guide 




Cognome e nome.. 

Via.:...N. 

Gap.Città.Provincia. 

□ Allego assegno non trasferibile di L.,.intestato a Editronica Sr 

□ Allego ricevuta di versamento di L.sul CC postale N. 19740208 intestato 

Editronica Srl, Corso Monforte 39,20122 Milano. 

□ Pago fin d’ora con la mia carta di credito Bankamericard N. 

scadenza . 

Data.:.Firma.:..!. 

□ Desidero fattura. Il mio C.Fisc./P.lva è:. 

□ Desidero ricevere il catalogo completo dei libri disponibili. 

Ritagliare e spedire a: Editronica Srl, Corso Monforte 39,20122 Milano. 






















































5170 IF ASC (X$) = 206 THEN GOSUB 5690: RETURN 

5180 IF ASC m) = 213 THEN GOSUB 5720: RETURN 

5190 IF ASC (X$) = 207 THEN GOSUB 5750: RETURN 

5200 RETURN 

5297 : 

5298 REM SPOSTA IL GIOCATORE E MUOVE GLI OSTAC 
OLI 

5299 : 

5300 IF PEEK (PX(V1X - 1,H1X)) = 160 THEN POKE 
PX(VlX.Hr/),160: POKE F/.W'/. - 1 ,H1X),171 :V1 
X = VIX - 1 : RETURN 

5310 Y = 0 

5320 FOR I = VIX - 1 TO 1 STEP - 1: IF PEEK (P 

X<I,H1X)) = 160 THEN Y = I:I = 1: GOTO 5340 
5330 IF PEEK (PXd.HlX)) = 170 THEN 1 = 1 
5340 NEXT 

5350 IF Y = 0 THEN RETURN 

5360 FOR I = Y TO VIX - 2: POKE PXd,H1X) ,24: NEXT 

5370 POKE PX(1,H1X),171: POKE PX(V1X,H1X),160 
5380 VIX = VIX - 1 : RETURN 
5390 IF PEEK (PX(V1X,H1X - D) = 160 THEN POKE 
PX(V1X.H1X),160: POKE PX(V1X,H1X - 1),171:H1 
X = HIX - 1 : RETURN 
5400 Y = 0 

5410 FOR I = HIX - 1 TO 1 STEP - 1: IF PEEK (P 
X(V1X,I)) = 160 THEN Y = I:I = 1: GOTO 5430 
5420 IF PEEK (PX<V1X,I)) = 170 THEN 1 = 1 
5430 NEXT 

5440 IF Y = 0 THEN RETURN 

5450 FOR 1 = Y TO HIX - 2: POKE PX(V1X,I) ,24: NEXT 

5460 POKE PX<V1X,1).171: POKE PX(yiX,HlX),160 
5470 HIX = HIX - 1 : RETURN 
5480 IF PEEK (PX(V1X,H1X + D) = 160 THEN POKE 
PX<V1X,H1X),160: POKE FX(V1X,H1X + 1).171:H1 
X = HIX + 1: RETURN 
5490 Y = 0 

5500 FOR I = HIX + 1 TO 40-X' = PEEK (R<(V1X,I) 

): IF XX = 160 THEN Y = I:I = 40: GOTO 5520 
5510 IF XX = 170 THEN I = 40 
5520 NEXT 

5530 IF Y = 0 THEN RETURN 
5540 FOR I = Y TO HIX + 2 STEP - 1 : POKE PX(V1X 
,I),24: NEXT 

5550 POKE R'W1X,I),171: POKE F/'(V1X,H1X),160 
5560 HIX = HIX + 1 : RETURN 
5570 IF PEEK (FX(V1X + 1,H1X)) = 160 THEN POKE 
F/.(V1X.H1X),160: POKE FX(V1X + 1 ,H1X),171 :V1 
X = VIX + 1 : RETURN 
5580 Y = 0 

5590 FOR I = VIX + 1 TO 23:XX = PEEK (F'd.HlX) 

): IF XX = 160 THEN Y = I:I = 23: GOTO 5610 
5600 IF XX = 170 THEN I = 23 
5610 NEXT 

5620 IF Y = 0 THEN RETURN 
5630 FOR I = Y TO VIX + 2 STEP - 1: POKE F/.d,H 
IX),24: NEXT 

5640 POKE F/.<I,H1X),171: POKE FX<V1X,H1X),160 
5650 VIX = VIX + 1 ; RETURN 

5660 IF PEEK (F/.(V1X 4 I.HIX 4 D) = 160 THEN POKE 
FX(V1X,H1X),160: POKE F<(V1X 4 I.HIX 4 1),I7 
1:V1X = VIX 4 1:H1X = HIX 4 1: RETURN 
5670 VSX = 1:HSX = 1:XX = 22 - VIX: IF HIX > VIX 4 
17 THEN XX = 39 - HIX 
5680 GOTO 5780 


5690 IF PEEK (F6W1X 4 1,H1X - D) = 160 THEN POKE 
FX(V1X,H1X),160: POKE KWIX 4 OIX - 1),17 
1:V1X = VIX 4 1:HIX = HIX - 1: RETURN 
5700 VSX = 1:HSX = - 1:XX = 22 - VIX: IF HIX < 2 
4 - VIX THEN XX = HIX - 2 
5710 GOTO 5780 

5720 IF PEEK (FX(V1X - 1,H1X - D) = 160 THEN POKE 
F/.<V1X,H1X),160: POKE F/.<V1X - MIX - 1),17 
1:V1X = VIX - 1:H1X = HIX - 1: RETURN 
5730 VSX = - 1:HSX = - 1:XX = VIX - 2: IF HIX < 

VIX THEN XX = HIX - 2 
5740 GOTO 5780 

5750 IF PEEK <F-1(V1X - 1,H1X 4 D) = 160 THEN POKE 
FX(V1X,H1X),160: POKE F/(V1X - MIX 4 1),17 
1:V1X = VIX - 1:H1X = HIX 4 1; RÉTURN 
5760 VSX = - 1:HSX = 1:XX = VIX - 2: IF VIX > 41 

- HIX THEN XX = 39 - HIX 
5770 GOTO 5780 

5780 Y = 0 

5790 • FOR I = 1 TO XX 

5800 IF PEEK (FX(V1X 4 VSX » I,H1X 4 HSÌX * D) = 

160 THEN Y = 1:1 = XX: GOTO 5820 
5810 IF PEEK (FX(V1X 4 VSX * I.HIX 4 HSX * D) = 

170 THBl I = XX: NEXT 1: RETURN 
5820 NEXT I 

5830 IF Y = O.THEN RETURN 

5840 FOR 1 = Y TO 2 STEP - 1 

5850 POKE F/.(V1X 4 VSX * I,H1X 4 HSX » 1),24 

5860 NEXT 

5870 POKE F/(V1X.H1X).160:V1X = VIX 4 VSX:H1X = 

HIX 4 HSX: POKE Fi(giX,HlX),171 
5880 RETURN 

5997 : 

5998 REM SPOSTA LE BELVE 

5999 : 

6000 FOR J = - 1 TO 1: FOR K = - 1 TO 1: IF PEEK 
(F/.(VX(N) 4 J.HX(N) 4 K)) = 171 THEN J = 1:K 

= 1: NEXT K,J: GOTO 7000 
6010 NEXT K,J 

6020 Y = - i: IF VIX > VX<N) THEN Y = 1 
6030 IF VIX = VX<N) THEN 6070 
6040 X = RND <1): IF X < .6 THEN 6090 

6050 Y = Y » - 1: IF X > .75 THEN Y = 0 

6060 GOTO 6090 

6070 Y = 0:X = RND d): IF X < .25 THEN Y = 1: GOTO 
6090 

6080 IF X ) .75 THEN Y = - 1 
6090 VX = VX<N) 4 Y 

6100 Y = - 1: IF HIX > HX<N) THEN Y = 1 
6110 IF HIX = HX<N) THEN 6150 
6120 X = RND d): IF X < .7 THEN 6170 

6130 Y = Y » - 1: IF Y > .8 THEN Y = 0 

6140 GOTO 6170 

6150 Y = 0:X = RND d): IF X < .25 THEN Y = 1: GOTO 
6170 

6160 IF X > .75 THEN Y = - 1 
6170 HX = «'.(N) 4 Y 

6180 IF PEEK (PX(VX.HX)) = 160 THEN POKE PX(VX 
(N),HX(N)).160: POKE PX(VX,HX),170:VX<N) = V 
X:HX<N) = fe: RETURN 

6190 IF PEEK (FX<VX,HX)) = 171 THEN VX(N) = VX: 
l«(N) = HX: GOTO 7000 

6200 A = 1:B = - 1 : IF VIX > VX<N) THEN B = 1:A = 

- 1 

6210 FOR J = B TO A STEP A 

Continua 
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Se non volete problemi di memoria, 
meglio far lavorare 3M. 



Prodotti per l’Informatica 

Divisione Sistemi per TUfficio 

Sede: Via S. Bovio, 1/3 - 20090 Milano S. Felice - Segrete Tel. 02/75451 
Filiali: Torino Tel. 011/6192192 - Mestre Tel. 041/962255 - Genova Tel. 010/451801 - 
Bologna Tel. 051/557157 - Firenze Tel. 055/355841 - Roma Tel. 06/58421 - Napoli Tel. 081/660266 


I problemi di memoria di 
un’azienda trovano la prima rispo¬ 
sta nella 3M già nel 1951, anno in cui 
la 3M sviluppò il primo nastro ma¬ 
gnetico per computer. 

Questo dato la dice lunga sul 
primato di esperienze tecnologiche 
maturate in questo campo dalla 3M, 
sul patrimonio di qualità e affidabili¬ 
tà della produzione 3M nel settore 
dei supporti magnetici. 

Prendiamo le diskettes, ad 
esempio: omologate dai maggiori 


costruttori, certificate al 100%, ga¬ 
rantite 5 anni, esportate in tutto il 
mondo, distribuite in Italia attraverso 
una rete capillare di 400 punti ven¬ 
dita. E soprattutto disponibili in una 
gamma completa sia nella misura 
da 8 pollici che in quella da 5 e 1/4, e 
con un esclusivo rivestimento ma¬ 
gnetico che consente un’eccezio¬ 
nale resistenza all'usura e la massi¬ 
ma affidabilità. 3M ha sempre una 
risposta pronta per i vostri 
mi di ufficio. 


■ DISTRIBUTORI 

AUTORIZZATI IN TUTTA 
_ ITALIA 

■ VEDI PAGINE GIALLE 
■ ALLA VOCE CENTRI 

■ MECCANOGRAFICI 
FORNITURE PER 


E non solo con i prodotti per l'in¬ 
formatica. Ma anche con i sistemi di 
fotocopiatura, microfilmatura, visual 
e di telecomunicazione. 

Perchè 3M lavora offrendo so¬ 
luzioni “ad alta tecnologia” per il vo¬ 
stro ufficio. E per tutti gli uffici. 

3M. SISTEMI 
PER L’UFFICIO 
































le coordinate orizzontale e verticale 
del marcatore del giocatore, metre 
H%(I) e V%(I) sono le coordinate 
della lesima belva. Dopo il controllo 
inteso a vedere se la belva sia proprio 
accanto al giocatore (una brutta fac¬ 
cenda per lui!) viene scelto per Y un 
valore di -1,0 o 1. Così verrà modifica¬ 
ta la coordinata della posizione della 
belva in modo che la probabilità di un 
suo avvicinamento al giocatore sia 
maggiore di quella di un suo allontana¬ 
mento. Nella locazione scelta viene 
fatto un PEEK per 160 (spazio). Se 


6220 2 = 1:D = - 1: IF HIX ) HZ<N) THEN Z = - 1 
iO = 1 

6230 FOR K = 0 TO Z STEP Z 
6240 IF PEEK (P‘/(W(N) + J,tK(N) + K)) = 171 THEN 
= VX(N) + JtHJ'.fN) = HZ(N) + KiJ = A:K = Z 
! NEXT K,J! GOTO 7000 

6250 IF PEEK <P7.M<N) ♦ J,IK<N) + K)) = 160 THEN 
POKE P’/(V;{(N),1K(N)),160!V/(N) = VX<N) ♦ J: 
IRfN) = H7.(N) + K; POKE P7.(O7.(N),HX(N)),170i 
J = A:K = Zi NEXT K.J: RETURN 
6260 NEXT KJtCOUNT/. = COUNT/. + 1: IF COUNT/, = D 
F THEN èoOO: REH VINCE IL GIOCATORE 
6270 RETURN 

6997 : 

6998 REM miSI PARTITA PERSA 

7000 POKE P5{<VX<N),HX(N)),160! POP sN = DF: NEXT 
N 

7010 POKE PX(VIX.HIX),170 
7020 FOR I = 1 TO 10: POKE P-/.(V17.,H1X),160 
7030 FOR J = 1 TO 20: NEXT 
7040 PRINT “i: REH CTRL-G 
7050 POKE PX<V1X,H1X),170: FOR J = 1 TO 40: NEXT 
J: NEXT I 

7060 POKE ( - 16368),0 
7070 HTAB 1 : VTAB 23 
7080 GOSUB 9000 
7090 POKE - 16368,0 

7100 PRM 'TEMPO: 'iTIMESì: INPUT * HAI PERSO 
! GIOCHI «4C0RA? 'jAf: IF LEFT$ (A$,l) < > 

•S* THEN HOME : N0»«L : END 
7110 GOTO 400 

7997 : 

7998 REM miSl PARTITA VINTA 

7999 : 

8000 POP :N = OF: NEXT N 

8010 FOR 1 = 1 TO 10: PRINT NEXT : REH CT 
RL-G 

8020 HTAB 1: VTAB 23: POKE - 16368,0 
8030 GOSUB 9000: PRINT 'TEMPO: ':TIME$|' HAI V 
INTO! ':: INPUT 'GIOCHI INCORA? '|A$: IF LEFTf 
(A^.l) < > 'S' THEN HOME : NORlttL : END 
8040 GOTO 400 

8997 : 

8998 REM FORfttTTAZIDNE DEL TEMPO 

9000 MIX = TIME / 60:SEX = TIME - MIX * 60:TIME$ = 

": IF MIX > 0 THEN TIME$ = STRI (MIX) ♦ ': 

■ 

9010 iim = iim 4 RiGHT$ eoo* + sm (SK), 

2 ) 

9020 RETURN 



incontra un ostacolo o un altro anima¬ 
le, la belva cerca nei quadrati adiacen¬ 
ti se c’è un posto favorevole nel quale 
portarsi (linee 6200-6250). Viene fatto 
un conteggio del numero delle belve 
che non riescono a trovare un luogo 
adatto in cui andare. Se 
COUNT=DF, il giocatore ha vinto. 
Con inizio dalle linee 7000 e 8000 com¬ 
paiono gli annunci dell’analisi della 
partita, che dicono se il giocatore ha 
perso o vinto. 

Durante il gioco un orologio mostra 
il tempo. I secondi che scorrono sono 
arbitrari, e variano in durata a seconda 
dell’entità dela ricerca che il computer 
svolge per trovare una mossa per cia¬ 
scuna belva. La routine per la format¬ 
tazione del tempo in visualizzazione 
MM:SS si trova nella subroutine a h- 
nea 9000. 

Come personalizzare 
il programma 

Si possono fare esperimenti con le 
probabilità nelle linee 6040-6150. Se si 
aumenta il numero a linea 6040, le 
belve puntano più velocemente sul lo¬ 
ro bersaglio, ma viene ridotta la loro 
capacità di aggirare gli ostacoli. Per 
realizzare belve molto in gamba si po¬ 
trebbe far dirigere periodicamente 
(per alcuni valori di TIME) una belva 
verso una locazione vicina ma non 
identica alla locazione del pezzo del 
giocatore. Ciò aiuterebbe la belva ad 
aggirare i muri. 

Al livello di difficoltà più elevato, 
quando tutte e tre le belve sono in 
campo, il gioco rallenta, in particolare 
se una o due belve sono in trappola. 
Questo avviene perché la routine di 
spostamento degli animali è seguita fi¬ 
no al termine (viene fatta la massima 
ricerca di un posto disponibile per lo 
spostamento). E’ questo il punto idea¬ 
le per una subroutine in linguaggio 
macchina che esplori la memoria di 
schermo, alla ricerca di uno spazio 
vuoto attorno a ciascuna belva. Si me¬ 
morizzi la coordinata di riga della bel¬ 
va (V%(I)) nell’accumulatore e si usi 
BASCALC per calcolare la locazione 
sullo schermo deU’inizio della riga. Si 
metta la coordinata orizzontale nel re¬ 
gistro Y e si faccia LDA(BASL),Y per 
avere nell’accumulatore il contenuto 
di una locazione dello schermo. Si fac¬ 
cia così per tutti i quadrati che circon¬ 
dano la posizione di una belva e si 
cerchi $A0 (spazio). Una routine in 
linguaggio macchina in questo punto 
accelererebbe il gioco proprio dove e 
quando è più necessario. 
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Quanto vale un 
Flexible Disc? 



Il valore di ogni Flexible Disc è il risultato della 
integrazione tra il dischetto ed il suo contenuto. 

Il contenuto è il prodotto della vostra intelligenza, del vostro la¬ 
voro, del vostro tempo. 

Il contenuto sono i dati che servono per informarvi sull’anda¬ 
mento della vostra Azienda e per permettervi di gestirla, che ren¬ 
dono fluide le procedure del vostro ufficio, che riempiono di se¬ 
renità e di divertimento il vostro tempo libero. 

Con Memorex il contenuto del vostro Flexible Disc, sia da 8” che 
da 5” 1/4, o da 3” 1/2 è protetto dalla tecnologia che è frutto 
di più di 25 anni di sviluppo sia dei prodotti magnetici che delle 
tecniche di registrazione e che ha permesso di raggiungere livel¬ 
li altissimi di affidabilità, durata ed uniformità della produzione. 


È importante, scegli Memorex 


A Burroughs Company 

Via Ciro Menotti, 14-20129 Milano-Telefono: 02/718551 






























































Ecco la settima e ultima puntata del corso di Pascal: 
stack e heap, e i meccanismi di allocazione 
della memoria, non hanno più segreti 


Chi stacca 
gli stack 



I n quest’ ultima puntata sul Pascal 
esamineremo alcuni problemi tec¬ 
nici, non metodologici. Non per que¬ 
sto tuttavia meno importanti: quando i 
nostri programmi in Pascal raggiunge¬ 
ranno certe dimensioni, questi proble¬ 
mi cominceranno infatti a farsi sentire. 
Ovviamente continueremo a parlare 
del Pascal Apple, ma il discorso si può 
facilmente generalizzare anche per al¬ 
tre implementazioni del Pascal. 

Consideriamo la memoria come una 
sequenza di bytes di dimensione fissa: 
una parte di essa è disponibile alFuten- 
te. Quando viene lanciato un pro¬ 
gramma Pascal, questo viene caricato 
in memoria a partire “dall’alto” (in 
senso metaforico). Tutta la memoria 
rimanente è disponibile per i dati: ov¬ 
viamente sarà tanto più grande quanto 
più il codice del programma è piccolo. 
In figura 1 vediamo una rappresenta¬ 
zione grafica della memoria disponibi¬ 
le all’utente (omettiamo di disegnare 
le aree di memoria riservate al siste¬ 
ma). Osserviamo che l’area dati con¬ 
tiene lo “stack” in alto e lo “heap” in 
basso. Questi crescono in versi oppo¬ 
sti, quindi lo stack può essere grosso se 
lo heap è piccolo, e viceversa. Se am¬ 
bedue crescono e si toccano, allora il 
programma viene interrotto e il siste¬ 
ma emette un messaggio del tipo 
“stack overflow”. 

Tutte le variabili di un Programma 


Pascal vengono allocate nello stack. Il 
tipo di allocazione è dinamico, cioè 
l’allocazione di una variabile avviene 
durante l’esecuzione di un programma 
e solo quando è effettivamente utile; 


quando la variabile non serve più, vie¬ 
ne disallocata. L’allocazione e deallo¬ 
cazione sono del tutto automatiche; 
vedremo dopo qual è il meccanismo. 
Esiste la possibilità, in Pascal, di allo- 


Area a 

disposizione 

deirutente 


— 

PROGRAMMA 





STACK 



+ 

♦ 


—► 

HEAP 

^ - 


Codice del programma : occupa 
' tanto piu' spazio quanto piu' il 
programma e' lungo. 


Area dati disponibili 
durante l'esecuzione del 
programma. 


Figura 1. La memoria durante i’esecuzione di un programma Pascal. 
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PROGRAM ESEMPIO 



INIZIO 


BEGIN 



-Richiamo di P 


Figura 2. Esempio 
di richiamo 
di una procedura. 


una sorta di ottimizzazione dello spa¬ 
zio di memoria. In ambedue questi 
esempi notiamo che le variabili A e B 
rimangono sempre allocate durante 
tutto il tempo di esecuzione. 

Tali variabili, che sono quelle di¬ 
chiarate nel “PROGRAM” (non nelle 
procedure o funzioni), prendono il no¬ 
me di “variabili globali”. Notiamo 
inoltre che prima e dopo l’esecuzione 
del programma non vi è alcuna varia¬ 
bile allocata. Questo significa che un 
programma non può comunicare con 
l’ambiente esterno mediante le sue va¬ 
riabili. In Pascal 1’ unico modo di 
scambiare informazioni con l’ambien¬ 
te esterno è attraverso i files; questi 
infatti non vengono allocati nello 
stack. Lo scambio di informazioni av¬ 
viene attraverso la variabile buffer, 
che è allocata nello stack. 


care manualmente delle variabili, 
usando i puntatori. Lo vedremo fra 
poco. Tutte le variabili allocate ma¬ 
nualmente vengono messe nello heap. 

Abbiamo detto che lo stack è gestito 
automaticamente. Vediamo come 
questo meccanismo trae origine dalle 
regole di visibilità: andiamo quindi a 
rispolverare queste regole. Conside¬ 
riamo un programma in cui ci sia una 
procedura con alcune variabili definite 
internamente (figura 2). Osserviamo 
la zona tratteggiata: è la zona in cui A 
e B sono visibili. Ora ci chiediamo: 
quando A o B sono effettivamente uti¬ 
li? Soltanto quando la procedura P è in 
esecuzione, cioè dal momento in cui il 
controllo salta a P fino al momento in 
cui il controllo torna da P. Prima e 
dopo, le variabili A e B sono invisibili, 
quindi la loro allocazione sarebbe inu¬ 
tile. 

Dunque il meccanismo di allocazio¬ 
ne è il seguente: le variabili interne a 
una procedura (e anche i parametri 
passati “per valore”) vengono allocate 
all’atto del richiamo e disallocate al¬ 
l’atto del ritorno. Tutto ciò in maniera 
completamente automatica e invisibi¬ 
le all’utente. Questa regola vale anche 
per procedure innestate o ricorsive. 
Nella figura 3 vediamo un esempio di 
richiamo innestato e la relativa evolu¬ 
zione temporale dello stack. Osserva¬ 
te che lo stack cresce man mano che si 
entra nelle procedure più innestate. 

Nella figura 4 vediamo un esempio 
di richiamo di “sorelle”, con relativa 
evoluzione temporale dello stack. No¬ 
tiamo una cosa molto importante: l’a¬ 
rea di memoria viene riutilizzata in 
tempi diversi. Lo spazio in cui erano 
state allocate C e D viene infatti riuti¬ 
lizzato per allocare E e F. Vi è dunque 


- PROGRAM P;- 

VAR A,B : ... 

-PROCEDURE PI ;- 

VAR C,D : , 

- PROCEDURE P2; - 


VAR E/ : 
BEGIN 


-END 


BEGIN 

P2; 

- END ; ■ 


PI; 


prima durante 

dell'esecuzione l'esecuzione 


P P 

R R 

0 0 

G G 

R R 

fì fì 

B B 

C C 

"Di iT 

_E_ 
r 


1 ‘ esecuzione 1 ' esecuzione 
di PI di P2 


tornato 
da P2 a PI 


tornato 
da PI a P 


dopo 

l'esecuzione 


Figura 3. Evoluzione temporale dello 
stack durante l’esecuzione di procedu¬ 
re innestate. 
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rrAUA/BBDO 




VI snt Huu tmm 


APPLE Ile non finisce qui. Se vi innamorate dell’Apple Ile, vi ri¬ 
cambierà. Dappertutto: in casa, in ufficio, da qualsiasi altra parte. 
Perchè compatto vuol anche dire trasportabile: Apple Ile sta In 
una valigetta 24 ore. 





An u UN coMPumt? 


AmE Ile ha tutto per farsi desiderare. Infatti, ha ereditato dalla 
sua famiglia, la famiglia Apple II, la più ampia libreria di prc^rammi 
esistente, ed è dotato del mouse, un accessorio rivoluzionario che 
vi permette di lavorare in maniera semplice ed intuitiva. 




APPLEUc: una ricchissima dote. Vi ci 
vorrà un po'di tempo per scoprire tutte 
le risorse dell'Apple Ile. Subito sarete in¬ 
cantati dal suo prezzo. E poi... Ma qui 
non c'è rimasto che lo spazio per antici¬ 
parvi le connessioni del suo pannello po¬ 
steriore: Mouse, Joystick e Paddles; Mo¬ 
dem; Visore a pannelb piatto, Televiso¬ 
re e Monitore colori RGB; Monitor; Dri¬ 
ve esterno; Stampanti e Plotter a colori. 
Apple Ile. Il computer che farà innamo¬ 
rare anche voi. 




jnpplG computer 

® APPLE COMPUTER S.p.A. - MILANOFIORI. PALAZZO Q8. 20089 ROZZANO (MI) 












-PROGRAM P;- 

VAR A,B : ... 

-PROCEDURE PI ; 

VAR C,D : 
BEGIN 




-PROCEDURE P2;- 

VAR E,F : 
BEGIN 


Figura 4. Evoluzione 
temporale delio stack 
durante l’esecuzione 
di procedure “sorelle”. 



dell'esecu-l'esecuzione l'esecuzione de PI a P l'esecuzione da P2 a P l'esecuzione 
zione di P di PI di P2 
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Figura 5. Evoluzione 
temporale dello stack 
durante l’esecuzione di 
una procedura ricorsiva. 


Vediamo ora Tallocazione di me¬ 
moria per le procedure o funzioni ri¬ 
corsive. Nella figura 5 vediamo un 
esempio. Osserviamo che, per ogni 
chiamata, viene fatta una allocazione 
ex novo della variabile A. E’ fonda- 
mentale tenere presente che un riferi¬ 
mento alla variabile A (ad esempio 
A: 5) causerà un accesso all’area di 
memoria allocata per ultima, cioè 
quella più in basso nella figura. Ciò 
significa che i valori inseriti nella va¬ 
riabile A nelle chiamate precedenti 
non vengono cancellati. 

Lo stesso discorso vale per i para¬ 
metri passati “per valore” e per il “ri¬ 
sultato della funzione”. Se volete fare 
un bell’esercizio, provate a disegnare 
l’evoluzione temporale dello stack du¬ 
rante l’esecuzione della funzione ri¬ 
corsiva fattoriale, vista nella quinta 
puntata in figura 13. Tenete presente 
che per ogni richiamo vengono alloca¬ 
te due variabili: il parametro N e la 
funzione FATT, ambedue di tipo IN- 
TEGER. 

Lo heap è gestito 
manualmente. 

Parliamo ora dello heap. Come ab¬ 
biamo già visto, si tratta di un’area di 
memoria riservata per 1’ allocazione 
manuale delle variabili, effettuata at¬ 
traverso i puntatori. Vediamo dunque 
cos’è il tipo POINTER e come si usa. 
Il tipo POINTER è un tipo predefinito 
e può considerarsi una via di mezzo fra 
un tipo semplice e un tipo strutturato. 
E’ “semplice” in quanto unitario, cioè 
non è composto da più “pezzi”. E’ 
strutturato in quanto permette di acce¬ 
dere a valori di altro tipo, quindi di 
costruire strutture di dati. 

Una variabile di tipo POINTER 
può contenere un “riferimento” a 
un’altra variabile. I più esperti avran¬ 
no già capito che un puntatore in so¬ 
stanza contiene un “indirizzo”. Non è 
del tutto vero: diciamo piuttosto che 
un puntatore contiene una immagina¬ 
ria freccia che punta a una variabile di 
un certo tipo. Per esempio, se voglio 
che P sia un puntatore che punti a una 
variabile intera, scriverò: 


VAR P:TNTEGER; 


dove il simbolo indica che P è un 
puntatore a un intero. Attenzione, ab¬ 
biamo detto “puntatore a intero”, non 
“intero”. A questo punto siamo già in 
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ma soltanto che possiamo decidere se 
o quando allocarle: il luogo di alloca¬ 
zione verrà scelto automaticamente 
dal sistema. 

La variabile P" sarà di tipo integer se 
P è un puntatore a integer; supponia¬ 
mo invece di avere una definizione sif¬ 
fatta: 


TYPE GIORNO (LUN,MAR, 
MER,GIO,VEN,SAB,DOM); 
TABELLA ARRAY GIORNOF 
BOOLEAN; 

VAR Q:TABELLA; 


Qui la variabile Q è un puntatore a 
TABELLA e, dopo aver effettuato 
una NEW(Q), la variabile sarà di 
tipo TABELLA. Un esempio di uso di 
Q può essere: 


Q SAB; TRUE 


grado di fare una allocazione manuale 
nello heap. Basterà chiamare la proce¬ 
dura predefinita NEW e passarle co¬ 
me parametro P. 


NEW (P) 


Questa procedura ha il seguente ef¬ 
fetto: alloca un’ area di memoria nello 
heap, atta a contenere un intero (per¬ 
ché P era un puntatore a intero), e 
inserisce in P il suo “indirizzo” o, me¬ 
glio, fa in modo che P la punti. In 
fìgura 6 vediamo la memoria dopo l’e- 
secuzione della procedura NEW. No¬ 
tiamo che P è allocato nello stack per¬ 
ché è una variabile ordinaria, definita 
tramite la “VAR” ; il puntato invece è 
allocato nello heap e prende il nome 
“P"” (leggi “pi freccia”, ove il simbolo 
“"” sta a indicare “puntato”. 

Attenzione: non è possibile cono¬ 
scere il valore di P, cioè non è possibile 
conoscere l’indirizzo di P". Questo 
perché P, essendo un puntatore, non è 
stampabile e non si può fare alcuna 
operazione aritmetica su di esso. 
Quando parliamo di allocazione ma¬ 
nuale, non intendiamo dire che possia¬ 
mo decidere dove allocare le variabili. 


Figura 7. Un esempio di 

PROGRAM PUNTATORI; puntatore ad un tipo strutturato. 

TYPE DATA = RECORD 
GIORNO 
MESE 


ANNO. :1900..2000 
END ; 

VAR R: '‘DATA ; 

BEGIN 


NEW (R) -ALLOCAZIONE 

MANUALE 


PROGRAMMA 


ì 


STACK 


RLANNO := 1983 ; 


END. 


R 



R".Giorno 

R'‘.Mese 

R'.Anno 



Heap 
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Sei proprio sicuro che ii tuo ( 

Siete certi di aver messo ai riparo ii vostro computer 
dai più comuni rischi e incidenti che possono capitargii? 

Rispondete sinceramente a queste 7 domande, 
sia che abbiate già sottoscritto una poiizza assicurativa, 
sia che ancora non i'abbiate fatto. 



Sempre più compatti e proprio per questo 
sempre più portatiii (si pensi aii'Appiè//c), i 
personaisi trasportano da casa aii ufficio, e 
viceversa, con estrema faciiità. E se durante ii 
tragitto si ha un incidente? Pagate voi? aSio^ 


1 




Andate al mare, in montagna, a casa di un 
amico e vi fermate lungo il tragitto per una 
commissione, un ladro vi ruba il computer dal 
portabagagli. Pagate voi?n sìa no 



Siete nel bel mezzo di un 'applicazione 
complicata. Non volete interrompervi ma 
nemmeno rinunciare a un whisky on thè rocte 
o al caffè. Ahimè, Il liquido finisce sulla 
tastiera mandando in cortocircuito il 
computer. Pagate voi? □ Si □ No 


















































imputer sia sempre al sicuro? 





I 


Partite per una vacanza e decidete di portare 
con voi il vostro personal. Andate in 
albergo, in una casa in affitto o nella villa 
di vostro fratello, e succede qualcosa al vostro 
computer. Pagate voi? n si a No 




Vostro figlio si avvicina al computer senza 
essere visto e comincia a picchiarci sopra con 
un oggetto più duro del vostro computer. 

□ Sì □ No 


Se un corto circuito o uno sbalzo di tensione 
danneggia II computer, pagate voi? □ Sì □ No 




Se qualche vostro amico o una vostra 
impiegata si fa male maneggiando il vostro 
personal, pagate voi? □ sì □ No 


RISPOSTE 

7 NO. Il vostro computer è davvero al sicu¬ 
ro. Bravi. 

6 No e 1 Sì. valutate bene se il caso in cui 
avete risposto sì ha scarse possibilità di 
verificarsi. Potrebbe valere la pena di ri¬ 
schiare e di lasciare le cose come stanno. 
Da 2 a 7 Sì. Affrettatevi a leggere il box qui 
sotto, perché il vostro computer non è 
affatto al sicuro, il che potrebbe causarvi 
un sacco di fastidi e farvi perdere un muc¬ 
chio di soldi. 


ll^ e applicando 

vi mettono al sicuro 

Sicuramente sarete convinti che esista già da tempo una 
polizza per assicurare il personal computer. Non è così. 
Finora tutte le compagnie di assicurazione hanno creato 
polizze nate per garantire I grossi centri di elaborazione 
dati, e solo in seguito hanno adattato queste polizze alle 
esigenze di coloro che vogliono assicurare il proprio perso¬ 
nal. Ma una polizza adattata non può certo paragonarsi a 
una polizza nata apposta per soddisfare le esigenze del 
possessore di un personal computer. Applicando. In colla¬ 
borazione con la Ras, una delle più importanti compagnie di 
assicurazioni Italiane, ha studiato a fondo il problema. E’ 
nata così la Polizza Applicando, la prima e. per il momento, 
unica assicurazione che copra tutti i rischi relativi ai posses¬ 
so e all'uso di un personal e delle sue periferiche (stampan¬ 
ti. drive, video.ecc). Applicando è orgogliosa di presentarla 
In anteprima ai suoi lettori e di offrire loro la possibilità di 
sottoscriverla nella maniera più semplice. Basta leggere 
attentamente le condizioni pubblicate alla pagina seguen¬ 
te. compilare il tagliando e spedirlo a Editronica srl. Polizza 
Applicando, corso Monforte 39, 20122 Milano. Avrete così 
risolto, per sempre, tutti i vostri problemi. 










































LE CLAUSOLE DELLA POLIZZA 


1) Premessa 

a) l’adesione alla presente polizza è riservata ai proprie¬ 
tari di un Personal Computer il cui valore stabilito 
come alla Condizione 6) sia superiore a L. 2.500.000 
IVA compresa: 

b) l'adesione alla presente polizza da parte dei proprie¬ 
tari di personal Computer avverrà a mezzo invio di 
apposita cartolina con il relativo importo di premio; 

c) l’intestatario della cartolina sarà considerato a tutti gli 
effetti come l’Assicurato; 

d) la garanzia sarà operante dalle ore 24 del giorno di 
spedizione della cartolina, risultante dal timbro posta¬ 
le. La copertura avrà durata un anno, sempreché la 
data di inizio della garanzia sia compresa nel periodo 
di validità della convenzione; 

GARANZIE PRESTATE E CONDIZIONI DI 
ASSICURAZIONE 

2) Sez. I - Danni materiali 

Derivanti da; 

a) incendio, opera di spegnimento e salvataggio, fulmi¬ 
ne, esplosione, scoppio, implosione: 

b) acqua e liquidi in genere, inondazione, alluvione, 
trombe, uragani, gelo, ghiaccio, neve, grandine, va¬ 
langa, caduta di massi e altri simili eventi; 

c) superamento del muro del suono, caduta di aeromo¬ 
bili o cose da essi trasportate: 

d) corto circuito, variazione di corrente, sovratensione 
arco voltaico, deficienze di isolamento, effetti di elet¬ 
tricità statica, induzione: 

e) imperizia, negligenza, errata manovra, nonché azioni 
dolose e colpose in genere; 

f) trasporti e smontaggi connessi con lavori di pulizia o 
di manutenzione; 

g) furto e rapina; 

h) terremoto, maremoto od eruzioni vulcaniche; 

i) persone che prendono parte a tumulti popolari, scio¬ 
peri, sommosse e che perpetrino indivudualmente od 
in associazione atti di terrorismo o sabotaggio verifi¬ 
catisi in occasioni di serrate. 

3) Sez. Il - Responsabilità Civile Terzi 

L'assicurazione si intende inoltre prestata per la Respon¬ 
sabilità Civile derivante all’Assicurato dalla proprietà e 

dall’uso personale del Computer assicurato identificato 

nel certificato di assicurazione. 

I massimali di garanzia si intendono fissati in: 


L. 100.000.000 per sinistro con il limite di 

L. 100.000.000 per ciascuna persona deceduta o che 
abbia subito lesioni personali 

L. 100.000.000 per danni a cose e/o animali. 

4) Esclusioni 

La Società non è obbligata per i danni dovuti a; 

- dolo dell’Assicurato; 

- corrosione, deperimento, logoramento che siano con¬ 
seguenza del normale uso o funzionamento o causati 
dagli effetti graduali degli agenti atmosferici; 

- per i quali deve rispondere il fornitore, venditore o loca¬ 
tore degli enti assicurati per legge o per contratto, o per 
inadeguata manutenzione; 

- causati da difetti di materiale o di costruzione che esi¬ 
stevano già all'atto della stipulazione della polizza ed 
erano a conoscenza dell’Assicurato; 

- causati direttamente od indirettamente da avvenimenti 
bellici, sommosse militari, invasioni, adozione di misure 
da parte di potenze straniere, rivoluzione, ribellione, 
insurrezione, assunzione od usurpazione di potere di 
carattere militare, sequestri; 

- verificatisi in occasione di esplosione, radiazione nu¬ 
cleare o di contaminazione radioattiva; 

- uso improprio del bene (mancato rispetto delle norme 
di impiego dettate dal costruttore); 

- danni estetici (quelli interessanti l’involucro esterno che 
non sia conseguenza di un danno risarcibile a termine 
della presente polizza): 

- guasti casualmente riconducibili ad interventi, a ripara¬ 
zioni e/o modifiche effettuate da un centro non autoriz¬ 
zato dalla casa costruttrice della macchina; 

- danni indiretti in genere, 

5) Operatività della garanzia 

a) La garanzia è operante solamente se gli enti assicurati 
sono ubicati presso il domicilio dell’Assicurato od in 
luoghi diversi da questi se in possesso dell’Assi¬ 
curato. 

b) La garanzia è pure efficace se i beni si trovano sull’au¬ 
tovettura in uso all’Assicurato, salvo i seguenti casi: 

- qualora l’autovettura venga lasciata incustodita dal¬ 
le ore 22 alle ore 6; 

- qualora l’autovettura regolarmente chiusa a chiave 
venga lasciata incustodia dalle ore 6 alle ore 22 e gli 
enti assicurati non opportunamente occultati nel 
bagagliaio. 


c) Limitatamente ai danni di rottura la garanzia è effica¬ 
ce solamente nel caso questi siano dovuti ad un inci¬ 
dente in cui rimanga coinvolto anche il veicolo in uso 
dell’Assicurato che trasportava i beni assicurati. 

d) Per gli enti per i quali non è stato stipulato il contratto 
di manutenzione e/o assistenza con la casa costrut¬ 
trice e/o ditte di essa mandatarie qualora l’ente ri¬ 
chieda per norma del fornitore detto contratto, la 
Società non risponde dei danni verificatisi in conse¬ 
guenza di guasto meccanico e/o elettrico salvo che 
l’Assicu rato provi che tale guasto sia causato da even¬ 
to esterno agli enti assicurati o da incendio originato 
da uno di questi enti. 

6) Somma Assicurata 

La somma assicurata per ciascun ente deve corrispondere 
al costo di rimpiazzo, ossia al prezzo di listino della casa 
costruttrice ed escluso ogni sconto o prezzo di favore di 
un ente nuovo, eguale od equivalente per caratteristiche, 
prestazioni e rendimento economico. 

7) Premio 

Per ogni singola applicazione è stabilito un premio forfet- 


tarlo omnicomprensivo così calcolato: 



Somma assicurata 

Premio 

da 2.500.000 a 3.000.000 

L. 

50.000 

da 3.000 000 a 5.000 000 

L. 

65.000 

da 5.000.000 a 7.000.000 

L. 

80 000 

da 7.000.000 a 10.000.000 

L. 

100.000 

da 10.000.000 a 15.000.000 

L. 

120.000 

da 15.000.000 a 20.000.000 

L. 

150.000 


8) Franchigia 

per ogni e qualsiasi danno che colpisca gli enti assicurati è 
stabilita una franchigia di; 

L. 50.000 per somma assicurata fino a L. 5.000.000 

L. 100.000 per somma assicurata superiore a 

L. 5.000.000 

Per sinistri causati da eventi come ai punti g) ed h) delle 
garanzie prestate, la Società liquiderà i danni sotto dedu¬ 
zione di uno scoperto pari al 20% della somma assicurata, 
col minimo delle franchigie sopra stabilite. 

9) Rinvio aile norme di iegge 

Per tutto quanto non è qui diversamente regolato, valgono 
le norme di legge. 


e applicando 

vi mettono al sicuro 


Si! Desidero assicurare i miei/ii mio computer, inviatemi a stretto giro di posta il certificato emesso dalla Ras. 
L'assicurazione avrà valore a decorrere dalle ore 24 del giorno di spedizione della mia adesione. Per la data fa fede il 
timbro postale. 


COGNOME. 

NOME. 

INDIRIZZO. 

CAP. CITTA' . 


. PROVINCIA. 

. N. 

Assicuro l/ll seguente personal: 
Marca e Modello 

N. di matricola 

Valore (IVA compresa) 



con le seguenti periferiche (stampanti, video, drive, hard disk, eco 

Marca e Modello N. di matricola Valore (IVA compresa) 


Nel caso non abbiate sufficiente spazio ricopiate su un foglio il testo completo di questo tagliando indicando tutti i prodotti che intendete assicurare. 

Per un totale complessivo di Lire.su cui pago il premio calcolato in base alia tabella riportata qui sopra (su fondoverde). 

Allego assegno non trasferibile di Lire.Intestato a Editronica srl, Corso Monforte 39,20l22Milano. 





































Figura 8. Due puntatori che puntano 
aiia medesima variabile. 


questa variabile 
ha due nomi PI" e P2" 



• • J* 




• ^«5 


. V’.*. 


Cioè assegniamo il valore TRUE al¬ 
la SABesima componente del puntato 
da Q. Un altro esempio compare in 

fìgura 7. 

Un puntatore può non puntare a 
nulla. Se scrivo P: NIL, P non punterà 
a nulla. NIL è una “costante di tipo 
puntatore”. Se P vale NIL, P" non esi¬ 
ste. Più puntatori possono puntare alla 
medesima variabile. Ad esempio: 


NEW (P1);P2: PI; 


In questo caso abbiamo allocato un’ 
area di memoria e l’abbiamo fatta 
puntare da PI. Poi abbiamo assegnato 
a P2 lo stesso valore di PI, quindi am¬ 
bedue puntano alla medesima variabi¬ 
le (vedi fìgura 8). Le operazioni am- 
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O SUPER VISION MI. Monitorcolori12”, scher¬ 
mo antiriflesso. Possibilità di funzionamento 
in text mode su fosfori verde, ambra, bianco rever¬ 
se, selezionabili dall’utente. Risoluzione640x262. 

O VISION PAL Monitor colori 12”, schermo an¬ 
tiriflesso. Possibilità di funzionamento in text 
mode su fosfori verde, ambra, selezionabili dal¬ 
l’utente. Ingresso videocomposito. Lowcost. 

O VISION PC. Monitor colori 12”, schermo anti¬ 
riflesso. Appositamente progettato per IBM 
PC. Risoluzione 640x262. 

O RGE VISION II. Monitor colori 12”. Risolu¬ 
zione 510x262. Ingresso RGB. Filtro smoked 
in dotazione. 

O KX1201 • E. Monitor fosfori verdi 12”, scher¬ 
mo antiriflesso. Ingresso videocomposito. 
Opzionale piedestallo di basculaggio KTS-1 con 


orologio LCD incorporato (rif. 16). 

O KX1212- E. Monitorfosfori verdi 12, schermo 
antiriflesso, compatibile con IBM PC. Opzio¬ 
nale piedestallo di basculaggio KTS-2 con orolo¬ 
gio LCD incorporato (rif. 17). 

O KP910. Stampante a matrice 9x9,156 colon¬ 
ne a 140 cps bidirezionali ottimizzati, trasci¬ 
namento trattori e frizione, grafica Elevata silen¬ 
zio sita Near letterquality. Interfaccia Centronics. 
Disponibilefirmware percompatibilitàcon IBM PC. 
Capacità stampa su originale -1- 3 copie. 

Opzioni: (rif. 9) e (rif. 12). 

O KP-810. Come KP910. Stampa su 80 colon¬ 
ne. Capacità stampa: originale -1- 2 copie. 

© KIF 4308. Buffer di memoria esterno da 64K 
bytes espandibili fino a 256K bytes. 

Può pilotare due stampanti. 


e 


KFD 510. Minifloppy 5” 1/4 da 140K byte 
^ slim line. Per Apple computerà e compatibili 
Apple. 

O KIF 3600. Interfaccia colore grafica per IBM 
PC. Da utilizzare con Vision PC (rif. 3) e super 
Vision III (rif. 1). 

^ KIF 3502. Interfaccia seriale RS 232 C. 


0 ' 


© KIF 3210 S/64. Espansione di memoria da 
64K a 256K bytes per IBM PC completa di 
interfaccia seriale RS 232 C. 

® RGB II B. Interfaccia RGB per computer 
Applell plus e Applell e, per i monitor (rif. 1) e 
(rif. 4). 

© KIF3700. Interfacciamonocromaticaestam- 
panteperlBM PC. Da utilizzare con KX1212-E 
(rif. 6) e KP 910 o 810 (rif. 7) e (rif. 8). 











Gigante nella qualità. Le periferiche TAXAN si 
sono imposte sul mercato USA per l’eccezionale 
affidabilità che nasce da una progetta 2 ione”senza 
economia” ed un’accurata scelta dei componenti 
impiegati. 


Gigante nella gamma. TAXAN offre una gamma 
completa di periferiche”madein Japan”, ideale per 
ognitipodi personal computer(IBM, APPLE, COM¬ 
MODORE, SINCLAIR. BBC. ecc.). 


Gigante nella convenienza. Decisamente com¬ 
petitivo, il prezzo è infine un’altra piacevole qualità 
delle periferiche TAXAN. 


Eledra - Sede 

Milano - Viale Elvezia, 18 

Tel.(02)34.97.51 (24 linee)-Telex332.332 ELEDRAI 


Eledra - Filiali 
Torino 

Tel. (011)30.99.111 - Telex 210.632 ELEDAT I 

Padova 

Tel. (049) 65.54.88 - Telex 430.444 ELEDAP ! 

Bologna 

Tel. (051) 30.77.81 ■ Telex 213.406 ELEDAB I 

Roma 

Tel. (06) 81.10.151 - Telex 612.051 ELEDAR I 

Bari 

Tel. (080) 81.43.95 


Partner distributivi 

Genova - Informatica Service 
Tel. (010) 56.43.35 

Udine - Asem s.p.a. 

Tel. (0432) 96.10.14 - Telex 450.608 ASEM I 

ELEDMS 

DISTRIBUTORE PRODOTTI ELETTRONICI N"1 






C4SSISTENZA 
HARDWARE 
IN LOCO 



ENCODEX è stata autorizzata in esclusiva 
da APPLE per l’ASSISTENZA TECNICA IN LOCO 


hinCODFX 
FNCODEX 
’ .'COUEX 

ENCCXEX 

I-NCOULX 


è ASSISTENZA TECNICA per il Vostro 
Personal Computer APPLE 

è la prima società indipendente di 
ASSISTENZA TECNICA in Italia 

è l’unica organizzazione autorizzata 
da APPLE per l’ASSISTENZA TECNICA 
IN LOCO su tutto il territorio nazionale 

Vi propone il servizio IN LOCO 
su tutto il territorio nazionale 
con tempestività d’intervento 
ovunque esso venga richiesto 

è ASSISTENZA TELEFONICA: 
il servizio permette di risolvere le Vostre 
difficoltà tecniche anche al telefono 

è ASSISTENZA TECNICA 24 ORE: 
la nostra segreteria telefonica è operativa 
per 24 ore sette giorni su sette. 



E.H.S. 


encodex hardware Service s.r.l. 



sede: milano, via padova, n. 38 
tei. 28.71.612 rie. aut. 5 linee 
telex: encsat -1 322268 


assistenza autorizzata 
in loco 
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L RAPPRESENTAZIONE SIMBOLICA 



NODO 

PROGRAM DINAMICO ; 


TYPE LISTA =“NODO 

NODO = RECORD 

INFORMAZ : ... ; 
PROSSIMO : LISTA 
END; 


VAR L : LISTA ; 

BEGIN 

NEW(L); 

NEW(L“.PROSSIMO ); 
L“.INFORMAZ:= ... ; 

NE W(L“.PROSSIMO" .PROSSIMO); 

END. 


Figura 10. Una lista memorizzata nello tieap. 



messe fra puntatori sono solo l’asse¬ 
gnamento (P1:=P2), l’uguaglianza 
(IF P1=P2 THEN...), la diversità (IF 
P10P2 THEN...). 

Per deallocare un’area di memoria 
dallo heap si usa la procedura RE¬ 
TE ASE(P). Questa procedura deallo¬ 
ca tutto lo spazio a partire dalla som¬ 
mità dello heap fino alla variabile pun¬ 
tata da P compresa (vedi fìgura 9). 
Osserviamo in figura 9 che nello heap 
vi è un’area senza nome. Questo per¬ 
ché abbiamo fatto due volte la 
NEW(R): la prima volta è stata alloca¬ 
ta un’area puntata da R, la seconda 
volta è stata allocata un’altra area 
sempre puntata da R. La prima area 
allocata quindi non ha più alcun pun¬ 
tatore che la punti. E’ dunque un’area 
esistente ma inutilizzabile perché pri¬ 
va di nome. Le variabili allocate nello 
heap non sentono l’effetto delle chia¬ 
mate a procedura. In altri termini, 
quando viene chiamata una procedu¬ 
ra, lo stack viene allungato (per conte¬ 
nere le variabili locali alla procedura) 


ma lo heap rimane invariato. 

Nello heap si possono costruire 
strutture dinamiche. I tipi strutturati 
definibili in Pascal (attraverso i co¬ 
struttori ARRAY, RECORD, FILE 
e SET) sono tipi a struttura statica, nel 
senso che richiedono un’area di me¬ 
moria di dimensione fissa. Attenzio¬ 
ne: quando parliamo di allocazione di¬ 
namica, intendiamo dire che la varia¬ 
bile può essere allocata o deallocata 
durante l’esecuzione del programma. 
Quando parliamo di struttura statica, 
intendiamo dire che, una volta alloca¬ 
ta, la variabile non è estendibile. Le 
due cose non si escludono a vicenda: le 
variabili strutturate del Pascal sono ad 
allocazione dinamica ma a struttura 
statica. Usando i puntatori e lo heap è 
possibile realizzare variabili ad alloca¬ 
zione dinamica e struttura dinamica. 

Un esempio di variabile a struttura 
dinamica è la “lista”. Una lista è una 
sequenza di elementi dello stesso tipo, 
che può essere allungata o accorciata a 
piacere. La vediamo nella figura 10. 


Osserviamo che una lista è formata da 
una sequenza di nodi, ogni nodo con¬ 
tiene una “informazione” e un punta¬ 
tore al prossimo nodo. Notate la defi¬ 
nizione mutuamente ricorsiva di LI¬ 
STA: il tipo LISTA è un puntatore a 
un NODO, ma il tipo NODO è un 
RECORD in cui un campo è a sua 
volta di tipo LISTA. Ciò è del tutto 
lecito in Pascal. 

Non ci addentriamo oltre nell’argo¬ 
mento: di strutture dinamiche si po¬ 
trebbe parlare per centinaia di pagine: 
liste doppie, liste di liste, array sparsi, 
alberi binari... Sono argomenti molto 
interessanti, ma a livello universitario. 
A chi fosse interessato consigliamo 
due libri che sono ormai pietre miliari 
nella storia della scienza dell’informa¬ 
zione: “Structured Programming” di 
Dijkstra, Dahl, Hoare e “Algorith- 
mus+ Data Structures= Programs” di 
N.Wirth. Li troverete in qualche 
Computer Shop oppure nelle bibliote¬ 
che delle università. 

Alessandro Mazzetti 
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BIT SHOP PRIMAVERA: 
PROFESSIONISTI IN PERSONAL COMPUTER. 


Bit Shop Primavera: una grande 
catena di negozi specializzati nella 
vendita di personal computer. Perché tu 
possa trovare con sicurezza il professio¬ 
nista che sa capirti, consigliarti, assisterti. 



Senza che tutto questo ti debba 
costare una lira in più. Per que¬ 
sto prima di scegliere il tuo perso¬ 
nal scegli dove comperarlo: si sa che 
chi ben comincia è a metà dell’opera. 


Il tuo Bit Shop Primavera è in: 


ABRUZZI 


Lanciano Digit Team 

di Limitone P. & C. (0872) 37266 

Pescara CEP Micro System 

di Livio Passeri. (085) 693750 

Computer Market S.n.c. (085) 26007 


BASILICATA 


Potenza COM.EL S.r.l. (0971) 23851 


CALABRIA 


Catanzaro Visicom s.r.l . (0961) 41673 

Cosenza Defim S.r.l. (0984) 74214 

Reggio Calabria Proteo S.r.l. (0965) 21685 


CAMPANIA 


Benevento DE.VI Computer 

S.n.c. di G. Vignale. (0824) 54005 

Casapulla 

RCE Engineering S.r.l. (0823) 460469 

I Napoli C.F. Elettronica 

1 Professionale . (081) 683728 

C.F. Elettronica Professionale (081) 241242 

Radio Forniture Lapeschi.... (081) 624957 

Quarto S.G. Cristofaro. (081) 8763676 

Salerno 

General Computer S.a.s. (089) 237835 


EMILIA ROMAGNA 

Bologna E.D.P. Sistemi. (051) 263032 

Luca Elettronica S.r.l. (051) 558646 

Cesena Computer House 

S.n.c. di Bagnoli & Dell’Amore (0547) 301766 

Fiorenzuola d’Arda 

Saccani Maurizio. (0523) 983976 

Forlì Home & Personal 

Computer di V. Camnasio.... (0543) 35209 

Lugo Selco Elettronica S.n.c. 

di Fabbri-Simioli & C. (0545) 22601 

Modena Polly Diffusion 

Video Games.(059) 211413 

Parma Bit Show 

di W. Passeri. (0521) 25014 

Piacenza SO.V.E.R. S.n.c. 

di Claudio Gazza & C. (0523) 34388 

Reggio Emilia Microinformatica 

di Ruini Marco. (0522) 34716 

Rimini Computer Shop 

di Tassinari. (0541) 771199 

Sassuolo Microinformatica 

di Ruini Mauro. (0536) 802955 


LAZIO 


Pomezia Elettronica 

Pomezia S.r.l.(06) 910344 

Rieti Essemmeci S.a.s. 

di Creili A. & C. (0746) 44704 


Roma 

Computer Market S.r.l. (06) 7945493 

Easy Byte S.r.l. (06) 7811519 

Radio Forniture Lapeschi. (06) 5818095 

Radio Forniture Lapeschi. (06) 8105792 


LIGURIA 


Genova Ali-Computer S.a.s. (010) 670990 

Antares di Isola S. &C. S.n.c. (010) 581520 

Centro Elettronica S.r.l.(010) 673238 

Computer Center S.a.s. (010) 581815 

Imperia A.R.I. di Acquarone 

& Brunengo. (0183) 20761 

Computer Shop di Cappuccio- 

Raineri-Mauro. (0183) 275448 

La Spezia I.L. Elettronica . . (0187) 511739 
Recco Digit Center 

di Baldinetti. (0185) 74252 

Sanremo A.R.S. S.n.c. 

di Acquarone & Brunengo ... (0184) 83204 


LOMBARDIA 

Agrate Brianza SO-CO S.d.f. 


di Andreoni & Porta. (039) 650635 

Ballano Computer 

Corner S.n.c. (0342) 604300 

Bergamo Sandit S.r.l. (035) 224130 

Brescia li Computer S.r.l. (030) 42100 

Busto Arsizio Busto Bit 

di V. Ornago. (0331) 625034 

Cesano Maderno Electronic 

Center Computer . (0362) 520728 

Cìnisello Balsamo 

G.B.C. Italiana S.p.a. (02) 6189391 

Colico Computer 

Corner S.n.c. (0342) 604300 

Como 2M Elettronica S.r.l.... (031 ) 278227 
Joster S.d.f. di Brenna, E. &C (031) 557412 
Crema EL.COM S.n.c. 

di Servidati Luigi. (0373) 83393 

Gallarate S.E.D. S.r.l. (0331) 795735 

Lecco S.G.A. 

Informatica S.n.c. (0341) 361264 

Legnano C.E.S.I. 

di Ghirardello. (0331) 595263 

Luino Micro Computer 

di Giorgetti Gianfelice. (0332) 537536 

Mantova Antek 

Computer S.a.s.(0376) 329333 

Milano Atlas System S.r.l. ... (02) 5464282 

G.B.C. Italiana S.p.a. (02) 437478 

G.B.C. Italiana S.p.a. (02) 2041051 

Las Vegas S.r.l. (02) 705055 

Monza E.M.I. S.r.l. (039) 388275 

Morbegno Computer 

Corner S.n.c. (0342) 604300 

Pavia M3 Computer S.n.c.... (0382) 31087 
Sesto Calende J.A.C. Nuove 

Tecnologie. (0331) 923134 

Sondrio Sondrio Computer 

S.a.s. di Boscarino. (0342) 212955 

Varese Supergames S.a.s.... (0332) 241092 


Vigevano Visentin Massimo (0381) 83833 
Voghera Byte 

Elettronica S.n.c. (0383) 212280 


MARCHE 


Ancona Cesari Renato. (071) 85620 

Macerata Piero Cerquetella. (0733) 35344 
Senigallia C.I.D.I. 

di E. Catozzi & C. (071) 659131 


MOLISE 


Campobasso Sistema S.r.l. . (0874) 94795 

Termoli Rosati Luigi & 

Rocco Antonio.: . (0875) 2147 


PIEMONTE 


Alba Centro Computer 

di Seletto Italo & C. (0173) 35441 

Alessandria Leone S.a.s. 

di Puma L. & C. (0131) 445692 

Biella Negrini Mario. (015) 402861 

Cuneo Rossi Marco & 

Figli S.n.c. (0171) 2339 

Favria Canavese Mister 

Personal di Vaudagna V.(0124) 428344 

Novara Ran 

Telecomunicazioni S.n.c.(0321) 35656 

Torino A.B. Computer S.a.s.. (011) 2163665 
Cominfor Sistemi S.a.s. 

di S. Vinone . (011) 793007 

Computer Shop S.a.s. (011) 6509576 

Duegi S.r.l. (011) 3358756 

Zucca Computer S.a.s. (011) 352262 

Verbania-Intra Elliott 

Computer Shop S.r.l.. (0323) 43517 

Vercalli Analog S.n.c. (0161) 61105 


PUGLIA 


Bari Sismet S.r.l. (080) 540733 

Brindisi Di Biase Leonardo.. (080) 228822 
Foggia Sinfor S.d.f. 

di D’Alfonso A. & E. (0881) 32579 

Lecce Carnei di Camassa V. . (0832) 592861 

Taranto Sud Computer 

di Calabresi R. S.a.s. (099) 338041 


SARDEGNA 


Cagliari Bit Shop 

di Vera Conti & C. S.a.s. (070) 490954 


SICILIA 


Caltanissetta 

Eleonori & Amico. (0934) 26656 

Catania Aria Nuova 

di Dell’Aria D. (095) 447286 

Messina Tempo Reale 

di Spadaro Achille. (090) 44450 


Palermo Conti Alberto.(091) 258338 

Informatica 

Commerciale S.p.a. (091) 291500 

Siracusa Logol System 

di G. Ficara. (0931) 53244 


TOSCANA 


Empoli Comelco S.a.s.(0571) 75077 

Firenze Andrei Carlo 

di Andrei Carlo & C. S.n.c.... (055) 472810 

Elettronica Centostelle S.r.l. (055) 610251 

Livorno C.P.E. 

Elettronica S.a.s. (0586) 27357 

Lucca Logos 

Informatica S.r.l. (0583) 55519 

Pisa IT-LAB S.r.l. (050) 501359 

Tecninovas Computer S.r.l... (050) 502516 

Pistoia C.D.E. S.r.l. (0573) 400712 

Prato Carlo Barbagli 

Elettronica di C. Barbagli &C. (0574) 595001 
Viareggio C.D.E. S.r.l. (0584) 942244 


VENEZIE 


Bassano dei Grappa 

Todaro Luciano. (0424) 22810 

Castelfranco Veneto 

E.D.S. S.r.l. (0423) 497151 

Conegliano E.D.S. S.r.l. (0438) 62345 


Mirano Saving Elettronica ... (041) 432876 

Monfalcone Electronia 

Bonazza di Bonazza Evelino (0481) 73534 

Montebelluna 

Ing. Di Sabatino & C. S.a.s... (0423) 302333 
Padova Computer Polnt 

di D’Andrea P. (049) 750130 

Sic Italia S.r.l. (049) 775647 

Rovereto S.E.D.A. S.a.s. (0464) 34506 

San Donà di Piave 

Computime S.r.l.(0421) 50474 

Trento S.E.D.A. S.a.s.,. (0461) 984564 

Trieste Computer Shop C.G.S. 

di V. Gasperin & C. S.d.f. (040) 61602 

Electronia Bonazza 

di Bonazza Evelino.(040) 572102 

MetroMarket S.p.A. (040) 631017 

Udine P.S. Elettronica S.a.s (0432) 482086 

Venezia Personal 

Computer S.a.s. (041) 29040 

Verona Chip Computer S.r.l.. (045) 21255 

Vicenza A.T.R. S.r.l. (0444) 564611 


UMBRIA 


Perugia Studio System S.a.s. 

di Tiacci A. & C. (075) 754964 


VALLE D’AOSTA 


Aosta Informatique S.a.s. 

di E. Ottoz & C. (0165) 765173 




























































































































CONTABILITÀ... 

IL PROBLEMA 
È SUPERATO 


a COMETA ha 

realizzato i 
programmi più 
aggiornati e 
completi di 
contabilità generale e semplificata, 
programmati dai più affermati specia¬ 
listi del settore. 

Telefonateci o scriveteci siamo a 
vostra disposizione per aiutarvi a 
risolvere il vostro problema. 

COMETA snc 

20154 MILANO 

Via Melzi d’EriI 38 - Tel. 5464468 - 3185007- 3493785 





















scuola 


a cura del professor Enzo Tonti 


Da quando ha preso il via la rubrìca Appliscuola, e 
precisamente dal numero 8 di Applicando, la quantità degli 
articoli sottoposti al curatore di questa rubrica è andata 
crescendo considerevolmente. E’ sembrato quindi opportuno 
proporre un articolo che spieghi chiaramente come questi 
programmi devono essere redatti. Risulterà utile a chi vuole 
collaborare, ma anche a chi vuole scrivere programmi didattici al 
di fuori dell’ambito di Applicando. 


Come redigere 
programmi didattici 


I programmi per rapprendimento, 
siano essi pubblicati su riviste o no, 
devono avere in comune una caratteri¬ 
stica fondamentale: essere facilmente 
leggibili. Questo per almeno due ra¬ 
gioni. La prima è di aiutare coloro che 
non hanno mai costruito programmi, 
offrendo loro listati ben fatti, facil¬ 
mente leggibili e abbondantemente 
commentati. 

La seconda ragione è che se un pro¬ 
gramma ha una struttura tale che sia 
facilmente leggibile, esso è anche fa¬ 
cilmente modificabile: ciascun inse¬ 
gnante o studente o lettore che lo vo¬ 
glia potrà arricchirlo, migliorarlo. 

Come redigere 
programmi didattici 

La prima essenziale caratteristica di 
un programma didattico dev’essere la 
sua leggibilità: per questa è bene sacri¬ 
ficare la velocità di esecuzione. Au¬ 
mentare la velocità del programma 
comporta il riposizionamento dei sot¬ 
toprogrammi in testa al programma 
stesso, la compattificazione di gruppi 
di istruzioni, la riunione di più istru¬ 
zioni su una stessa linea separandole 
con i due punti. Ebbene sono proprio 
queste le cose che diminuiscono la leg¬ 
gibilità di un programma. 

II requisito di massima velocità di 
esecuzione è essenziale nei programmi 
di tipo scientifico in cui vi sono centi¬ 


naia, migliaia e talvolta anche decine 
di migliaia di calcoli. E’ essenziale nei 
programmi gestionali dove devono es¬ 
sere smistate e analizzate centinaia o 
migliaia di stringhe in tempi brevi per¬ 
ché... il cliente attende e le macchine 
non possono fermarsi. 

Non è invece necessario rendere ve¬ 
loce un programma didattico perché di 
solito coinvolge un numero modesto 
di calcoli e perché l’insegnante deve 
nel frattempo spiegare e lo studente 
deve nel frattempo... comprendere. 

Di qui una prima massima che po¬ 
tremo enunciare così: per l’apprendi¬ 
mento è meglio un programma lento 
ma leggibile che un programma veloce 
ma illeggibile. 

Usare pochi GO TO 

Per facilitare la leggibilità occorre 
ridurre al massimo il numero dei ri¬ 
mandi del tipo GO TO. Programman¬ 
do con il linguaggio BASIC non è pra¬ 
ticamente possibile evitare i rimandi. 
Un esame di diversi programmi pub¬ 
blicati su riviste indica che i rimandi 
che si trovano all’interno di un singolo 
modulo, cioè di un segmento di un 
listato che racchiude istruzioni dedica¬ 
te a una medesima funzione, in linea di 
massima non ingarbugliano eccessiva¬ 
mente la lettura del programma. 

Quelli che sono assolutamente da 
evitare sono i rimandi che continuano 


a far passare il controllo da un modulo 
a un altro e fanno perdere letteralmen¬ 
te il filo del discorso. 

Possiamo paragonare i GOTO al 
comportamento di una persona che 
parlando continua a saltare “di palo in 
frasca” costringendo l’ascoltatore a se¬ 
guirlo nei suoi contorcimenti verbali 
con fatica crescente e a scapito della 
comprensione. E’ quindi opportuno 
che il programma sia diviso in un mo¬ 
dulo principale e in una serie di sotto¬ 
programmi. 

Dal programma principale si rinvia 
ai singoli sottoprogrammi mediante 
una serie di GOSUB e da questi si 
ritorna al programma principale con il 
relativo RETURN. I sottoprogrammi 
è bene che posseggano un solo ingres¬ 
so e una sola uscita. 

Quindi evitare, per quanto possibi¬ 
le, di rimandare con dei diversi GO¬ 
SUB di volta in volta a punti diversi di 
uno stesso modulo e evitare anche di 
situare diverse istruzioni di RETURN 
nello stesso modulo. 

Quando si voglia modificare un pro¬ 
gramma o cercare un eventuale errore 
si dovrà focalizzare la propria atten¬ 
zione sull’intero modulo passandolo in 
rassegna più volte e rivedendone la 
logica. Quando neH’interno di un mo¬ 
dulo si deve svolgere una funzione in 
modo leggermente diverso a seconda 
del valore di un parametro allora è 
bene dividere il modulo in sottomodu¬ 
li, ciascuno relativo a una eventualità: 
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un’istruzione GOTO aH’inizio del mo¬ 
dulo può smistare ai singoli sottomo¬ 
duli a seconda del valore del parame¬ 
tro. Al termine di ciascun sottomodu¬ 
lo è bene rimandare il controllo all’ul¬ 
tima istruzione del modulo che dev’es¬ 
sere il RETURN. 

Significato dei simboli 

Le variabili che vengono usate in un 
programma è bene che siano presenta¬ 
te all’inizio indicandone il loro signifi¬ 
cato in un apposito modulo posto all’i¬ 
nizio del programma. Per esempio, se 
si dovesse rappresentare l’eclissi di so¬ 
le e si dovesse disegnare la terra, il sole 
e la luna, potremmo indicare con RS il 
raggio del sole, con RL quello della 
luna e con RT quello della terra. Que¬ 
ste variabili possono essere poste all’i¬ 
nizio del programma in una serie di 
REM entro una lista dei simboli. Evi¬ 
dentemente non è necessario listare 
tutte le variabili di servizio che vengo¬ 
no via via usate nel programma, ma 
debbono invece essere presentate 
quelle che hanno una parte di rilievo 
nel programma. 


L’etichetta del rinvio 

I rinvi! ai singoli sottoprogrammi 
debbono avvenire alla linea nella qua¬ 
le c’è l’intestazione del sottoprogram¬ 
ma. Quindi, se ad esempio nel sotto¬ 
programma 7600 c’è scritto REM 
ESECUZIONE DEI CALCOLI, 
mentre i calcoli incominciano alla 
7620, in luogo di scrivere GOSUB 
7620 è meglio scrivere GOSUB 7600. 

II rinvio alla 7620 accelererebbe di 
pochissimo l’esecuzione del program¬ 
ma, mentre renderebbe meno imme¬ 
diata la lettura del programma. Infatti 
il lettore dovrebbe cercare l’istruzione 
7620 e quindi risalire alla 7600 per ve¬ 
dere di quale sottoprogramma si trat¬ 
ta. 

E’ bene indicare dopo ciascun GO¬ 
SUB la funzione svolta nel sottopro¬ 
gramma al quale si rinvia. Ad esem¬ 
pio: 


GOSUB 7600: REM ESECUZIONE 
DEI CALCOLI 


E’ buona regola fare in modo che la 
lettura del programma principale chia¬ 
risca la logica dei passaggi confinando 
nei singoli sottoprogrammi le modali¬ 
tà di esecuzione delle funzioni per le 


quali il sottoprogramma è concepito. 

I commenti 

E’ bene che il programma sia com¬ 
mentato: ma in luogo di fare lunghissi¬ 
me serie di righe che dichiarino per 
esteso ciò che dev’essere fatto, si può 
fare una o due righe che presentino la 
funzione svolta dal sottoprogramma o 
comunque la fase che si sta svolgendo. 
E’ bene poi mettere accanto alle singo¬ 
le istruzioni dei REM che spieghino il 
loro contenuto. Per essere pubblicati 
in una rivista, tuttavia, i programmi 
non devono essere troppo lunghi e non 
ci dev’essere quindi uno spreco di RE- 
Mark: è bene mantenere un minimo di 
concisione che non vada però a scapito 
della chiarezza. 

Alcuni autori hanno la tendenza ad 
arricchire il programma con delle pro¬ 
lisse presentazioni iniziali accompa¬ 
gnate da riquadri fatti da asterischi, 
con nomi in INVERSE, con commenti 
in FLASH e con temporizzatori del 
tipo FOR K=1 TO 10000:NEXT K. 
Questo modo di presentare i program¬ 
mi è ispirato ai molti giochi per perso¬ 
nal computer. Orbene bisogna distin¬ 
guere ciò che è fondamentale da ciò 
che appesantisce la lettura del pro¬ 
gramma e lo allunga inutilmente. E’ 
bene che ci si attenga a un minimo di 
quadri, addirittura, se è possibile, a 
uno solo, nel quale in sintesi siano 
messe tutte le cose fondamentali: il 
nome del programma, quello dell’au¬ 
tore e una piccola spiegazione. Lascia¬ 
mo che tutti gli ulteriori ricami siano 
fatti dai singoli lettori quando, in pos¬ 
sesso del programma che funzioni, de¬ 
cideranno di dedicarsi al suo abbelli¬ 
mento. 

Sull’Apple II poi c’è un inconve¬ 
niente: quando la lunghezza del pro¬ 
gramma è superiore a seimila caratteri 
(circa) questi invadono la zona di me¬ 
moria riservata alla prima pagina gra¬ 
fica. Ne viene che se il programma usa 
la prima pagina grafica, al momento in 
cui questa viene attivata il programma 
si blocca. La ragione sta nel fatto che 
all’atto dell’ attivazione della grafica 
con il comando HGR si cancella la 
relativa zona di memoria e quindi ven¬ 
gono cancellate quelle istruzioni che... 
avevano osato invadere la pagina gra¬ 
fica. Questo inconveniente si può ri¬ 
mediare (si veda il libro dello scriven¬ 
te, pag.96 e seguenti). Ma il rimedio 
migliore è quello di non allungare i 
programmi con un numero eccessivo 
di decorazioni. All’allungamento del 
programma contribuiscono in modo 
considerevole i numerosi trattini, aste¬ 


rischi e altri segni che vengono messi 
per abellire il programma. 

Nella scelta del carattere con il qua¬ 
le effettuare la separazione tra i singoli 
blocchi, una linea di segni è prefe¬ 
ribile a una linea di segni o di “$” o 
di “#”. Questi caratteri, a causa della 
loro corposità, anziché produrre un ef¬ 
fetto di stacco tra due istruzioni fini¬ 
scono per legare una riga con la suc¬ 
cessiva. 

Proteggere gli ingressi 

Se il programma prevede l’ingresso 
di dati numerici con una serie di IN¬ 
PUT, è opportuno che sia indicato di 
fianco a ciascun INPUT che cosa de¬ 
v’essere dato. Supponiamo che si deb¬ 
ba tracciare una circonferenza e che si 
debba immettere il valore del raggio: 
non è sufficiente l’istruzione INPUT 
R. Sul monitor dovrà apparire una 
scritta che precisi ciò che viene richie¬ 
sto. Questo si realizza ad esempio con 
l’istruzione: 


INPUT “RAGGIO DELLA CIR¬ 
CONFERENZA ”;R 


o più semplicemente 
INPUT “RAGGIO = ”;R 


Ma ciò non basta perché il lettore in 
generale non ha idea del valore nume¬ 
rico da assegnare: potrebbe immettere 
0.15 oppure 40000 e spesso il program¬ 
ma si blocca perché il valore dato non 
è compatibile con i rimanenti. Perciò è 
bene che siano indicati gli estremi del¬ 
l’intervallo numerico entro il quale il 
raggio deve essere assegnato. Ad 
esempio: 


INPUT “RAGGIO (15<R<200) ”;R 


Un metodo ancora migliore consiste 
nell’assegnare in precedenza un valore 
numerico standard lasciando all’uten¬ 
te la possibilità di variarlo entro certi 
limiti. Qualora egli voglia accettare il 
valore preassegnato non ha che da bat¬ 
tere il tasto (RETURN). 

L’optimum si realizza quando, dopo 
aver battuto un numero, il calcolatore 
stesso controlla se il numero assegnato 
rispetta i limiti che gli sono stati impo¬ 
sti e, nel caso che ciò non accada, im¬ 
ponga di rientrare. Ecco un modo di 
realizzare la protezione dell’ingresso: 
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Gruppo UlIlipUwOll: il primo servizio integrato per la consulenza, la vendita e Tassistensa 
hardware e software. Per vivere meglio con il computer a Roma. 


OlKflhlltf : per essere sicuri di trovare, provare, ac¬ 
quistare i personal più nuovi, i programmi più versatili, 
gli accessori più utili. In un ambiente confortevole e tran¬ 
quillo, nel centro di Roma, Compushop offre la consu¬ 
lenza personalizzata e l’assistenza informativa, anche per 
chi di computer non sa niente. Compushop: per vede¬ 
re, provare, scegliere 
Apple HE, Apple IIC, 

Apple III, Macintosh, 

Lisa, Disk drives 5”, 

8”, ’3 Harddisks, Mo- 
nitors a colori. Stam¬ 
panti ad aghi e a 
margherita. Tavolette 
grafiche, Coprocesso- 
ri, Interfacce seriali e 
parallele, Modems e 
accoppiatori acustici. 

Interfacce per macchi¬ 
ne da scrivere. Carta 
su modulo continuo, 

Nastri inchiostrati, 

Floppy disks, Kits puli- 
scitestina. Mobili porta 


computers. Cassette magnetiche. Programmi per ela¬ 
borare tèsti, archivi, calcoli finanziari, grafici, statisti¬ 
ca, contabilità fiscale, musica, giochi. Linguaggi. 
Compushop per poter domandare tutto su tutto, 
per poter confrontare tutto con tutto, per imparare 
tutto, per sapere finalmente tutto. Al punto 

: il nuovo 
centro del gruppo 
Compushop dove tro¬ 
vare la stessa profes¬ 
sionalità nell’assistenza 
informativa, la stessa 
disponibilità per chi di 
computer non sa nien¬ 
te e per chi già sa tut¬ 
to, ma vuole essere 
aggiornato su tutte le 
novità. 

Compushop, al Punto 
Compushop: i due pun¬ 
ti vendita hardware e 
software a Roma, per 
chi vuole vivere meglio 
con il computer. 




Il primo vero Cash & Carry del personal 
computer. Ideale per chi di computer sa 
tutto e non ha bisogno di chiedere nulla. 


Per chi vuole comprare ed andar via, per¬ 
chè il suo tempo è denaro. E perchè con 
il Cash & Carry si risparmia. 


CU 

o 

(J) 

m 


il Personal a servizio completo 
telefono: (06) 857124 


• Via Nomentana 265/273 

Tel. 8450078 

• Via L. Bonincontri 105/107 

Tel. 5140792 

• Via Picco dei Tre Signori 45 

Tel. 898238 


• Via Famagosta 33 

Tel. 385408 

• Piazza S. Anastasia 3 
Tel. 678663/6786648 


Vivere meglio col computer a Roma 











scuola 



10 R=100 

20 VTAB 10: HTAB 6: ?“RAGGIO 
(15<R<200) ”;R;: INPUT R$ 

30 IF R$=““ THEN GOTO 60 
40 R1 = VAL(R$):IF Rl<15 OR 
Rl>200 THEN 20 
50 R=R1 
60 ... 


La sindrome del vuoto 

Bisogna inoltre evitare la cosiddetta 
“sindrome del vuoto”, consistente nel 
fatto che dopo aver lanciato il pro¬ 
gramma il monitor diventa buio. L’u¬ 
tente non capisce se il calcolatore si è 
bloccato oppure se sta facendo dei cal¬ 
coli, in tal caso per quanti secondi ( o 
...minuti primi) debba attendere; se 
per caso è stata aperta la pagina grafi¬ 
ca ma non sia stato assegnato il colore 
per cui il calcolatore sta tracciando di¬ 
segni... invisibili, e così via. 

Per evitare questo è sufficiente pri¬ 
ma di aprire una pagina grafica o di 
battere HOME far apparire una di¬ 
chiarazione, ad esempio: “attendere 
25 secondi: sto calcolando 280 valori di 
una funzione” e lasciare che questa 
scritta rimanga per tutto il tempo di 
effettuazione dei calcoli. Sul monitor è 
bene che vi sia sempre un annuncio. 

Il modo migliore di rendere un pro¬ 
gramma leggibile è quello di mettere 
una sola istruzione per riga. Se però il 
programma deve essere pubblicato su 
una rivista, questo è un inconveniente, 
perché diventa eccessivamente lungo. 
Si deve allora mettere più istruzioni 
per riga ma facendo in modo che le 


“Papà, mi aiuti? Non mi è venuta 
un’espressione... ” Molti padri (e ma¬ 
dri) rincasando dopo una giornata di 
lavoro si sentono rivolgere una richie¬ 
sta di questo tipo; ne seguono lunghe 
sedute a tavolino nella ricerca dell’er¬ 
rore fatto dal figlio, ragazzino delle 
medie, salvo scoprire spesso che l’er¬ 
rore non c’è, ma è il risultato fornito 


istruzioni che si mettono su una stessa 
riga non siano troppe e comunque sia¬ 
no abbastanza omogenee, cioè relati¬ 
ve a una stessa fase; per esempio: 
istruzione di assegnazione oppure co¬ 
mandi grafici oppure istruzioni di 
stampa. 

E’ un servizio che si fa alla causa 
dell’istruzione in generale e della 
scuola in particolare, quello di facilita¬ 
re l’adattamento del programma ai più 
svariati tipi di personal. Questo si può 
effettuare separando le istruzioni 
esclusive dell’Apple da quelle comuni 
agli altri personal. Un modo di fare ciò 
consiste nell’evitare di mettere su una 
singola riga comandi relativi alle istru¬ 
zioni grafiche HGR, HGR2, HPLOT, 
ecc. con comandi del BASIC stan¬ 
dard. A questo si aggiungano i coman¬ 
di TEXT, HOME, HIMEM, LO- 
MEM, VTAB, HTAB che sono esclu¬ 
sive del calcolatore Apple. 

Un servizio ancora più apprezzato è 
quello di assegnare etichette dispari 
alle istruzioni specifiche dell’Apple. 
Ciò si ottiene abbastanza facilmente 
operando nel modo seguente: dopo 
aver provato con più lanci che il pro¬ 
gramma funzioni, si effettua una rinu¬ 
merazione generale di passo 10, quin¬ 
di si rinumerano le istruzioni specifi¬ 
che dell’Apple con etichetta che ter¬ 
mina per 5. Tutto questo si può fare 
velocemente usando due favolosi pro¬ 
grammi che si chiamano rispettiva 
mente Global Program Line Editor e 
Doublé Take. Personalmente li trovo 
tanto utili che ogni volta che accendo il 
calcolatore carico per prima cosa que¬ 
sti due programmi in memoria. 

Enzo Tonti 


del professor Giulio C. Barozzi 

dal libro che è sbagliato. Che cosa so¬ 
no dunque queste espressioni, croce e 
delizia dei ragazzi delle scuole medie? 
Tecnicamente parlando, un’espressio¬ 
ne è una sequenza finita di operazioni 
(addizione, sottrazione, moltiplicazio¬ 
ne, divisione) eseguite su numeri ra¬ 
zionali, cioè numeri rappresentati da 
frazioni (= rapporti tra interi), in cui 


Come risolvere un piccolo dramma familiare 
con l’aiuto di un elaboratore personale. 

Espressioni 
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l’ordine di priorità nell’esecuzione 
delle operazioni (moltiplicazioni e di¬ 
visioni prima di addizioni e sottrazio¬ 
ni) viene spesso alterato mediante l’u¬ 
so di parentesi. Una volta imparate le 
regole per l’esecuzione delle operazio¬ 
ni sulle frazioni, il calcolo di un’espres¬ 
sione è un’attività del tutto ripetitiva: 
di qui l’idea di affidarne l’esecuzione a 
un programma scritto per un elabora¬ 
tore personale. 

Il programma ESPRESSIONI, che 
illustriamo nel seguito di questo arti¬ 
colo, è stato scritto in BASIC Apple¬ 
soft. Prima di addentrarci in un’analisi 
dettagliata del programma, illustria¬ 
mo l’idea di base su cui esso è costrui¬ 
to. Un’espressione ci si presenta come 
una sequenza finita di simboli che so¬ 
no o frazioni, o segni di operazione, 
oppure parentesi (aperte e chiuse). 
Immaginiamo un automa che scandi¬ 
sce l’espressione da sinistra a destra e, 
in una prima passata, associa a ogni 
operazione un numero non negativo 
che possiamo chiamare il “livello” di 
tale operazione. La regola è questa: 
partendo dal livello 0, quando l’auto¬ 
ma incontra una parentesi aperta, il 
livello cresce di un’unità; quando in¬ 
contra una parentesi chiusa, il livello 
diminuisce di un’unità. Il livello parte 
da 0 e deve tornare a 0; se così non è, 
abbiamo commesso un errore nella 
scrittura dell’espressione: il numero 
delle parentesi aperte non è uguale al 
numero delle parentesi chiuse. Il livel¬ 
lo di un’operazione ci dà una misura 
del suo “annidamento”. A questo 
punto, partendo dalle operazioni di li¬ 
vello più elevato, l’automa esegue pri¬ 
ma moltiplicazioni e divisioni, poi ad¬ 
dizioni e sottrazioni aventi un medesi¬ 
mo livello : quando entro una coppia di 
parentesi sta scritta una singola frazio¬ 
ne, le parentesi possono essere elimi¬ 
nate, e si procede a eseguire le opera¬ 
zioni di livello immediatamente infe¬ 
riore, fino a quelle di livello 0 . Tutto 
ciò corrisponde a quello che s’insegna 
ai ragazzi: si calcola prima ciò che sta 
entro parentesi tonde, cioè le opera¬ 
zioni di livello 3, poi ciò che sta entro 
quadre (livello 2), entro graffe (livello 
1 ) e, infine, se ce ne sono, le operazio¬ 
ni fuori parentesi. 

A questo punto descriviamo in che 
modo è articolato il programma. Esso 
può essere suddiviso in quattro parti: 

• istruzioni per l’uso (linee di pro¬ 
gramma 100-490); 

• subroutines (500-1500); 

• programma principale (1510-2820); 

• stampa del risultato e messaggi di 
errore (2830-2980). 

Passiamo all’esame di ognuna delle 


100 

HO 

120 

130 

140 

150 

léO 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 


REM »»»««««*«««»»«»«««*««»» 

REM » * 

REM * ESPRESSIONI » 

REM » <0 1984 BY * 

REM « GIULIO C. BAROZZI « 

REM * » 

REM 

HOME : PRIMI 'VUOI LE ISTRUZIONI? <S/N)‘! GET R$ 
IF RI < > ’S- GOTO 1520 
HOME : PRINT "INTRODURRE L'ESPRESSIONE USlWDO" 
PRINT "I SEGUENTI SIMBOLI ! PRINT 
PRINT ■ t PER L'ADDIZIONE 


PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 


PRINT • - PER LA SOTTRAZIONE 

PRINT • * PER LA MOLTIPLICAZIONE ; " 

PRINT • ! PER LA DIVISIONE 

PRINT • ( PER LE PARENTESI APERTE 

PRINT • ) PER LE PARENTESI CHIUSE 

PRINT ■ / PER IL SEGNO DI FRAZIONE 

PRINT • * mmi AD OGNI ESPONENTE." 

PRINT "AD ESEMPIO: LA FRAZIONE DUE AL CUBO" 



FRATTO TRE QUADRATO SI INTRODUCE" 

"BATTENDO IN SEQUENZA I TASTI: 2*3/3*2." 

PRINT "(BATTERE UN TASTO PER CONTINUARE)": GET ZI 
HOME : PRINT "EVENTUALI SPAZI VONGONO IGNORATI." 

PRINT : PRINT "I OENOMIWTORI DEVONO SEMPRE ESSERE" 

PRINT "POSITIVI." 

PRINT : PRINT "GLI ESPONENTI DEVONO ESSERE" 

PRINT "INTERI NON NEGATIVI." 

PRINT : PRINT "AL TERMINE DELL'ESPRESSIONE" 

PRINT "BATTERE IL TASTO = ." 

PRINT : PRINT "CONTROLLARE ATTENTAMENTE I 
PRINT : PRINT "SE SI COWETTE UN ERRORE," 

PRINT "BATTERE IL TASTO <- " 

PRINT "(FRECCIA A SINISTRA)" 

PRINT "FINO A PORTARSI SUL CARATTERE ERRATO," 

PRINT "E POI RIDIGITARE L'ESPRESSIONE" 

PRINT "DA QUESTO PUNTO IN AVAMTI." 

PRINT : PRINT "NON USARE IL TASTO --> ! " 

PRINT : PRINT "(ft^TTERE UN TASTO PER CONTINUARE)": GET ZI 
GOTO 1520: REM -- AL PROGRAMMA PRINCIPALE 
REM — SUBROUTINES *** LEHURA DI Uf« FRAZIONE 
510 H = 2 

520 Yl = MIDI (AI,H,1) 

530 IF Yl = "/" THEN 550 
540 H = H + 1 : GOTO 520 

550 NI = LEFTI (AI,H - 1):L1 = LEN (AI):DI = RIGHTI (AI,L1 - H) 
560 RETURN 

570 REM **» CALCOLO DELLE POTENZE 
580 H = LEN (VI) 

590 FOR J = 2 TO H - 1 

600 IF MIDI (VI,J,1) = "*" THEN 630 ^ 

’ ' Continua 
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Uscuola 



ÓIO NEXT J 
620 RETURN 

630 B = m ( LERi (V$,J - 1)):E = WL ( RlGHTf 
(y$,H - J)):S = SGN (B):B = ABS (B) 

640 V = !: !F E = 0 ANO B < > 0 THEN 680 

650 IF E = 0 (WO B = 0 THEN 2880 

660 FOR J = 1 TO E:y = V * B: NEXT JiV = S * y 

670 !F V > mx THEN 2910 

680 VI = STRI (V) : RETURN 

690 RBi »** HOLTIPLICAZIWE 

700 GOSUB 990 

710 N = Al * A2:M = B1 * B2: IF N > MAX OR M > m 
X GOTO 2910 
720 GOSUB 1070 
730 IF 0 = 1 THEN 750 
740 N = N / D:M = M / D 
750 GOSUB 1130 
760 GOTO 2470 
770 REM **« DIVISIONE 
780 GOSUB 990 
790 IF A2 = 0 GOTO 2890 

800 N = Al * B2:M = B1 » A2: IF N > OR M > fW 
X GOTO 2910 
810 GOSUB 1070 
820 IF D = 1 THEN 840 
830 N = N / 0:M = M / 0 
840 IF M } 0 THBl 860 
850 N = - N:M = - M 
860 GOSUB 1130 
870 GOTO 2470 

880 REM »*» ADDIZIONE E SOTTRAZIONE 

890 GOSUB 990 

900 IF XKI) = THEN 920 

910 N = Al * 82 + A2 » Bl! GOTO 930 

920 N = Al * 82 - A2 * 81 

930 M = 81 » 82: IF N > («X OR M > f«X GOTO 2910 

940 GOSUB 1070: REM -- ALL'ALGORITMO EUCLIDEO 

950 IF D = 1 THEN 970 

960 N = N / D:M = M / 0 

970 GOSUB 1130: REM -- ALLA SI STERZI ONE DE! DATI 
980 GOTO 2570: REM -- RIENTRA NEL PROGRMtì FRI 
NCIPALE 

990 REM *** LETTURA DEGLI OPERANDI 
1000 Al = XKI - 1) 

1010 GOSUB 500 

1020 Al = VAL (NI):B1 = WL (DI) 

1030 Al = XKI + 1) 

1040 GOSUB 500: REM -- ALLA LETTURA 01 UNA m 
ZIONE 

1050 A2 = VAL (NI):B2 = VAL (DI) 

1060 RETURN 


1070 REM »«» ALGORITMO EUCLIDEO 

1080 A = ABS (N):B = M 

1090 Q = M (A / B):R = A - Q * 8 

1100 IF R = 0 THEN 1120 

Ilio A = 8:8 = R: GOTO 1090 

1120 D = B: RETURN 

1130 REM *** SISTEmZlONE DEI DATI DOPO UN'OPE 
RAZIONE 

1!40 XKI - 1) = STRI (N) 4 V 4 STRI (M): REM 
-- SCRIVE IL RISULTATO AL POSTO DEL PRIMO 0 
PEfóVlDO 

1150 FOR K = I TO NX: REM -- COMPAHAZIONE DEI 
VETTORI XI E ex 

1160 XKK) = XKK 4 2):CX(K) = CX(K 4 2) 

1170 NEXT K 
1180 NX = NX - 2 
1190 RETUIW 

1200 REM »** ST(¥1PA DELL'ESPRESSIONE 

1210 PRINT : FOR K = 1 TO NX 

1220 IF XKK) = ■4' THEN 1300 

1230 IF XKK) = THEN 1300 

1240 IF XKK) = THEN 1300 

1250 IF XKK) = ■:■ THEN 1300 

1260 IF CX(K) ( ) - 3 THEN PRINT XKK);: GOTO 
1310 

1270 Al = XKK): GOSUB 500 

1280 IF DI = '!■ THEN PRINT NI;: GOTO 1310 

1290 PRINT Al;: GOTO 1310 

1300 PRINT ■ ^XKK);* ’; 

1310 NEXT K 

1320 PRINT ■ =■: RETURN 

1330 REM *** POTENZA 

1340 Al = XKI - 1) 

1350 GOSUB 500 

1360 A = VAL (NI):B = VAL (DI) 

1370 H = LEN (XKI 4 D) - 1 
1380 E = VAL ( RIGHTI (XKI 4 l),H)) 

1390 N = 1 :M = 1 : IF E = 0 AND A ( ) 0 /«D 8 ( ) 
0 THEN 1450 

1400 IF E = 0 «^0 (A = 0 OR 8 = 0) THEN 2880 

1410 FOR K = 1 TO E:N = N ♦ A:M = M » 8: NEXT K 

1420 IF N ) OR M ) rttX GOTO 2910 

1430 GOSUB 1070: REM -- ALL'ALGORITMO EUCLIDEO 

1440 N = N / D:M = M / D 

1450 XKI - 1) = STRI (N) 4 •/■ + STRI (M) 

1460 FOR K = I 4 1 TO NX: REM -- COMPATTAZIONE 
DEI VETTORI' XI E CX 
1470 XKK) = XKK 4 1):CX(K) = CX(K 4 1) 

1480 NEXT K 

1490 NX = NX - 1: RETURN 

1500 REM — FINE DELLE SUBROUTINES 

Continua 
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Milk pfogiammì 



X Le Pagine del Software 
sono un supplemento se¬ 
mestrale di Applicando, il 
mensile per i personal com¬ 
puter Apple. Acquistarle 
singolarmente costa 
12.000 lire. Per chi si abbo¬ 
na ad Applicando sono in 
regalo. 


Stai per acquistare un personal 
computer Apple? 

Vorrai sapere che cosa puoi farci. 
Questo volume è un aiuto indispen¬ 
sabile, una guida ragionata e com¬ 
pleta di tutti i programmi disponibili 
in Italia. Prima di fare il tuo acquisto 
non puoi non consultarlo, perché 
solo se avrai a disposizione il pro¬ 
gramma 0 i programmi che ti inte¬ 
ressano la tua scelta non ti lascerà 
deluso. 


perle 


Hai appena acquistato un perso¬ 
nal computer Apple? 

Senza questa raccolta di program¬ 
mi non potrai mai sapere quali e 
quanti utilizzi potrai farne. 


Possiedi già da tempo un perso¬ 
nal computer Apple? 

Allora non c’è bisogno di dirti quan¬ 
to può essere prezioso questo libro: 
sai già che il tuo computer, senza 
programmi, è come un’auto senza 
benzina. E poiché non c’è limite alla 
fantasia e all’inventiva, consultando 
questa guida scoprirai utilizzi im¬ 
pensati per il tuo personal. Utilizzi 
che ti permetteranno nel lavoro, nel 
tempo libero, nel gioco o nello stu¬ 
dio, di essere sempre il più aggior¬ 
nato, il più organizzato, il più soddi¬ 
sfatto... 


Desidero ricevere, senza aggravio di spese postali, Le Pagine del Software con la 
seguente formula (segnare la casella di proprio interesse): 

□ 12.000 lire per ricevere l’edizione Autunno 1984 de Le Pagine del Software 

o 50.000 lire per ricevere 10 numeri di Applicando e in regalo l’edizione Autunno 1984 
de Le pagine del Software. 

COGNOME E NOME. 

VIA. N. 

CAP. CITTÀ. PROV. 

□ Allego assegno non trasferibile dii.intestato a Editronica Srl. 

□ Allego ricevuta di versamento di L.sul CC postale N. 19740208 intestato a Editronica Srl. 


Ritagliare, compilare e 
spedire a: Editronica Srl, 
Corso Monforte 39, 
20122 Milano. 


Corso Monforte 39. 20122 Milano. 


□ Pago fin d’ora con la mia carta di credito Bankamericard N.scadenza 

Data. Firma. 


□ Desidero fattura. Il mio C.Fisc./P.lva è 
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34170 GORIZIA - CORSO ITALIA, 149 TELEFONO 0481/30909 

Accessori per 11 vostro Apple 

Solo per Apple Ile - espansione 64K * 60 colonne al p»rezzo 
eccezionale di Lire 220.000 

novità': 

Tastiera professionale 90 tasti * 5 0 comandi basic +12 

tasti funzione 10 tasti definibili da voi Lire 298 000 
Tavoletta grafica c ompleta di software; L. 235.000 
Tako - un click e potrete usare Toltra faccia del vostro dischetto: 
Lire 25.000 

BUPm ras 8T AmPATÌTl 

utilissimi per risparmiare tempo ed utilizzare al massimo il 
vostro computer. Indispensabili per chi usa molto la 
stampante. Vi permettono di usare il computer mentre il Buffer 
manda alla stampante i dati che ha immagazzinato, 
nelle versioni: 

Alimentato dalla stampante - da Centronics a Centronics con 
capacita' di 8 K Lire 250.000 

Alimentato a 220 V. - da Centronics a Centronics con capxjcita' 
di 16 K e comando di Reset Lire 315.000 
Come sopra ma con cap>acita' di 32 K Lire 370.000 
Come sopra ma con capacita' di 64 K Lire 470.000 

Buffer da 64 k espandibile sino a 256 K ingresso seriale uscita 
Centronics Lire 680.000 

Stessa ma ingrosso Centronics od uscita seriale L 680.000 
Stessa ma ingresso seriale uscita sw'iale L. 730.000 

ACOaSSOftl VAU 

Disk Drive slim: L. 450.000 

Doppio controller : L 100.000 

Language card 16 K: L 110 000 

Z-80 p er CP/m : L. 118.000 

80 colonne con soft switch: L. 220 .000 

Super Serial Card con cavo di collegamento: L. 170.000 

Interfaccia Centronics per Epson - Tolly - Star con grafica a 

sole Lire 118.000 

Schedo p>er far parlare la vostra mela con softw: L. 90.000 
Programmatore di EPROm (2716-2732-2764): L. 120.000 
Scheda Poi Col<y con suono: 95.000 
1 29 K R Am: L. 380.000 

Wild Card per Apple II plus e compatibili (per copiare tutti i 
programmi): L. 90.000 

Replay: l a piu’ pxDtente scheda jDer copia p«^ Apple II plus e 
compatibili L. 158.000 

Joystick autocentranti: L. 42.000 

FLOPPYDISK 

In scatole da 10 pezzi tutti con anello di rinforzo: 

TIPO DASHUA niEmOREX 3m-SCOTCH 

SF-SD L. 40.000 L. 50.000 L. 55.000 

DF-DD L. 58.000 L. 68.000 L. 68.000 

Kit 3m per la pulizia delle testine del vostro drive a L. 55.000 

SOFTW All pn niAOinTOSH 

Chiedeteci la lista II 


Vendita per corrispondenza. Tutti i prezzi indicati 
comprendono ri VA. nessuna spesa di spedizione per ordini 
superiori alle 50.000 Lire. Prezzi soggetti a variazioni 
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scuola 


1510 REM — INIZIO DEL PROGRATtlA PRINCIPALE 
1520 MAX = 999999999: DIM X$(10fl),C7.(100)! ONERR 
GOTO 2880 

1530 REM — INTRODUZIONE DELL'ESPRESSIONE 
1540 HOME : PRINT ‘INTRODUCI L'ESPRESSIONE:': PRINT 

1550 Al = ":LA = 0 

1560 GET XI: IF XI = ‘ ‘ THEN 1560: REM -- ELIM 
imZlONE DEGLI SPAZI 
1570 IF XI < > CHRI (8) THEN 1610 
1580 14 = LA - 1: PRINT Xl;‘ ‘iXI; 

1590 IF LA = 0 THEN Al = ": GOTO 1560 
1600 Al = LEFTI (Al,LA): GOTO 1560 
1610 PRINT Xl; 

1620 IF XI =■=■• THEN 1640: REM 
FINE DELL'ESPRESSIONE 
1630 Al = Al 4 XI:LA = LA + 1: GOTO 1560 
1640 REM — IL VALORE FMLE DI LA E' LA LUN 
GHEZZA DELL'ESPRESSIONE 

1650 IF LEni (Al,2) = ‘-C THEN Al = ‘-l*’ 4 
RIGKTI (Al.LA - 1):LA = LA 4 2 
1660 IF LA ( 6 THEN 1720 
1670 J = 0 

1680 J = J 4 1 

1690 IF MIDI (AI,J,3) < > ‘(-C THEN 1710 
1700 Al = LEFTI (AI,J) 4 •-!*■ 4 RIGHTI (Al,LA - 
J - 1):LA = LA 4 2 
1710 IF J ( LA - 2 THEN 1680 
1720 REM ™ COSTRUZIONE DEI VETTORI XI E CX 
1730 1 = 0:K = 0:YVI = ‘C 
1740 FOR J = 1 TO LA • 

1750 Yl = MIDI (AI,J,1) 

1760 IF Yl = ■4‘ /WD YVI ( > ‘C THEN 1850 

1770 IF Yl = •-• mm { > •(• THEN 1850 

1780 IF Yl = THEN 1850 

1790 IF Yl = ■:■ THEN 1850 

1800 IF Yl = •(' THEN 1900 

1810 IF Yl = •)■ THB4 1930 

1820 YVI = Yl 

1830 NEXT J 

1840 GOTO 1980: REM -- AL CONTROLLO SULL'ULTI 
MO DATO 

1850 REM — COPPIA FRIZIONE - OPEIWZIONE 
1860 IF J = K 4 1 THEN 1880 
1870 I = I 4 1:XI(I) = MIDI (AI,K 4 1,J - K - 1) 
:CX(I) = - 3 

1880 1 = 1 4 l:XI(I) = YI:CX(1) = 0 

1890 K = J:YVI = Yl: GOTO 1830: RB1 -- NEXT J 

1900 REM — PARENTESI APERTA 

1910 1 = 14 l:XI(l) = YI:CX(1) = - 1 

1920 K = J:YVI = Yl: GOTO 1830: REM -- NEXT J 
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i-?): 

2 3 / 


( 1 


4 2 

5 > ^ 


( 1 


(((1/2 - 2/3)''3:(l + 4/5) "2 + 1)*(1 + 1/5)) + 1/7 = 


Figurai, come si 

presenta 

un’espressione 

inuniibrodi 

testo (sopra) e ia 

corrispondente 

sequenza di 

caratteri da 

digitare per 

caicoiaria 

mediante ii 

programma 

ESPRESSIONi 

(sotto). 


quattro parti indicate. Le istruzioni 
per l’uso del programma vengono pre¬ 
sentate sullo schermo (opzionalmen¬ 
te): l’espressione viene introdotta 
usando i simboli disponibili sulla ta¬ 
stiera; il segno ( per le parentesi aper¬ 
te, il segno ) per le parentesi chiuse, i 
simboli -t- per le quattro 

operazioni; le frazioni vengono intro¬ 
dotte digitando il numeratore (even¬ 
tualmente preceduto dal segno meno) 
seguito dal segno / (per indicare la li¬ 
nea di frazione), e di seguito il deno- 


1930 REM — COPPIA FRAZIONE - PARENTESI CHIUSA 

1940 IF J = K 1 1 THEN 1940 
1950 1 = 1 + 1:X$(I) = MIDI (A$,K + 1,J - K - 1) 
:CX(I) = - 3 

1960 1 = 1 + 1:XI(1) = Y$:CX(I) = - 2 
1970 K = J:YV» = Y$: GOTO 1830: REM -- NEXT J 
1980 REM -- CONTROLLO SULL'ULTIMO DATO 
1990 IF J = K + 1 THEN 2010 
2000 1 = 1 + 1:X«I) = MIDI (A«,K + 1,J - K - 1) 
:CX(I) = - 3 

2010 MX = 1:W = NX: REM - NUMERO DEGLI ELEMENT 
I DEI LETTORI X$ E C/. 

2020 REM — RICERCA DEGLI INTERI 
2030 FOR K = 1 TO NX 
2040 IF CX(K) < > - 3 THEN 2100 
2050 Af = X$(K): IF LEFT$ (A$,l) < > ■“* THEN 2 
070 

2060 CX(K) = - 4: GOTO 2100 
2070 L = LEN (M) 

2080 FOR J = 2 TO L - 1: IF MI0$ (A$,J,1) = V 
THEN 2100: NEXT J 
2090 XI(K) = A$ + V + *1* 

2100 NEXT K 

2110 REM — POTENZE NELLE FRAZIONI 
2120 FOR K = 1 TO NX 

2130 IF CX(K) < > - 3 THEN 2200: REM -- SI ES 
^ItWO SOLO LE FRA2I0f4I 

2140 A$ = XÌ<K): GOSUB 500: REM -- ALLA LETTURA 
DELLA STRINIi) 

2150 14 = Ni: GOSUB 570: REM -- AL CALCOLO DE 
LLE POTENZE 
2160 Ni = Ui 

2170 14 = Di: GOSUB 570: REM -- AL CALCOLO DELL 
■ E POTENZE 
2180 Di = Ui 

2190 XÌ(K) = Ni + ■/' + Di 
2200 NEXT K 

2210 REM — RIDUZIONE DELLE FRAZIONI Al MINIMI 
TERMINI 


2220 FOR K = 1 TO NX 
2230 IF Cy.(K) { > ' - 3 THEN 2300 
2240 Ai = XÌ(K): GOSUB 500: REM -- ALLA LETTURA 
DI UtW FRAZKWE 

2250 N= m(NÌ):M= LAL (Di) 

2260 GOSUB 1070: REM - ALL'ALGORITMO EUCLIDEO 

2270 IF D = 1 THEN 2290 

2280 N = N/D:M = M/ 0 

2290 XÌ(K) = STRi (N) + V* + STRi (M) 

2300 NEXT K 

2310 REM — DETERHIWZIONE DEI LIVELLI DELLE 
OPERAZIONI 
2320 L = 0:UttX = 0 
2330 FOR K = 1 TO NX 
2340 IF CX(K) = - 1 THEN L = L + 1 
2350 IF CX(K) = - 2 THEN L = L - 1 
2360 IF CX(K) = 0 THEN CX(K) = L 
2370 IF L > LMAX THEN LfttX = L 
2380 NEXT K 

2390 IF L < > 0 GOTO 2900 
2400 PRINT : GOSUB 1200: REM -- ALLA ST^IPA DE 
LL'ESPRESSIONE 

2410 REM — INIZIO DEL CALCOLO 
2420 FOR L = LfttX TO 0 STEP - 1 
2430 REM — MOLTIPLICAZIONI E DIVISIONI 
2440 I = 0 
2450 1=1+1 

2460 IF CX(l) < L THEN 2490 
2470 IF Xi(l) = •»■ GOTO 690: REM -- ALLA MOLTI 
PLICAZIONE 

2480 IF Xi(l) = •:• GOTO 770: REM -- ALLA DIVIS 
ll^E 

2490 IF I < NX GOTO 2450 
2500 IF NX = 1 GOTO 2820: REM -- USCITA DAL CI 
CLO-ALLA ST(!»1PA DEL RISULTATO 
2510 IF NX < NV THEN GOSUB 1200: REM -- ALLA 
STAMPA DELL'ESPRESSIONE 
2520 NV = NX 

2530 REM — SOfflE E SOTTRAZIONI 

5 = 0 ' Continua 


c 
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qp[«)!]8seuola 


2550 

2560 

2570 

2580 

2590 

2600 


1 = 1 + 1 

!F Cl(l) < L THEN 2590 

IF X$(l) = ■+" GOTO 880: REM -- ALL'ADDIZIONE 
IF Xf(I) = GOTO 880: REM -- ALLA SOTTRAZIONE 


minatore. I numeri interi vengono in¬ 
trodotti come tali. Il programma ac¬ 
cetta esponenti interi non negativi, 
che vengono introdotti seguendo le 
convenzioni del linguaggio BASIC: la 
figura 1 mostra tutto ciò in modo più 


IF I < NX GOTO 2550 
IF NX = 1 GOTO 2820: REM - 
LA STAMPA DEL RISULTATO 
2610 IF NX < W THEN GOSUB 1200: 

DELL'ESPRESSIONE 
2620 NU = NX 


USCITA DEL CICLO-AL 


REM 


ALLA STAMPA 


IF L = 0 GOTO 2820: REM -- USCITA DAL CICLO 
REM — ELIMMZIONE DELLE PARENTESI 


1 ) 


REM -- ESCE DAL CICLO-ALL 


-- ALLA ST«1PA DELL'ESPRE 


2630 
2640 

2650 ! = 2 
2660 1 = 1 + 1 

2670 IF CX(I) < ) -2 THEN 2780 
2680 IF CUI - 2) < > - 1 THBl 2780 
2690 REM — CUITROLLO SU EVENTUALI POTENZE DA ESEGUIRE 
2700 IF CXd + 1) = - 4 THm GOSUB 1330 
2710 FOR K = I TO NX: REM - COMPATTAZIONE DEI VETTORI Xi E CX 
2720 X$(K) = X$(K + 1):C/.(K) = CX(K + 1) 

2730 NEXT K 

2740 FOR K = 1 - 2 TO NX 
2750 X$(K) = X$(K + 1):CX(K) = CX<K + 

2760 NEXT K 

2770 NX = NX - 2: IF NX = 1 GOTO 2820: 

A STt^PA DEL RISULTATO 
2780 IF 1 < NX GOTO 2660 
2790 IF NX < W THEN GOSUB 1200: REM 
SSIONE 
2800 W = NX 

2810 NEXT L: REM -- FINE DEL CALCOLO 
2820 Rei — STAMPA DEL RISULTATO 
2830 PRINT :A^ = X$(l): GOSUB 500: REM 
TATO 

2840 IF 0$ < > ■!■ THEN 2860 
2850 PRINT N$: GOTO 2920 
2860 PRINT Ai: GOTO 2920 
2870 REM — MESSAGGI DI ERRORE 

2880 PRINT : PRINT : PRINT "ERRORE NELLA SCRITTURA DELL'ESPRESSIO 
NE!": GOTO 2920 

2890 PRINT : PRINT "DIVISIONE PER ZERO I": GOTO 2920 
2900 PRINT : PRINT : PRINT "ERRORE NELLA SCRITTURA DELLE PARENTES 
I ": GOTO 2920 

2910 PRINT : PRINT "NWERI TROPPO GIWIDI !" 

2920 PRINT : PRINT "UN'ALTRA ESPRESSIONE ? <S/N) " 

2930 GET Ri 

2940 IF Ri = "S" GOTO 1540 
2950 IF Ri = "N" THEN 2970 
2960 GOTO 2930 
2970 PRINT : PRINT "CIAO'" 

2980 END 


parentesi aperta 

-1 

parentesi chiusa 

-2 

frazione 

-3 

esponente 

-4 

operazione 

> 0 


( = al livello della 
operazione ) 


Figura 2. li valore del termine C%(K) 
indica la natura del contenuto del termine 
X$(K). 


- ALLA LETTURA DEL RI SUL 


eloquente di ogni spiegazione. 

Il blocco delle subroutines (dieci per 
l’esattezza) è stato posto in testa al 
programma principale, per aumentar¬ 
ne la velocità di esecuzione. Nel listato 
ciascuna subroutine è preceduta da 
un’istruzione REM , la quale descrive 
sinteticamente la funzione svolta dalla 
subroutine stessa. Il programma prin¬ 
cipale è, a sua volta, articolato in varie 
parti. Le istruzioni 1510-1640 corri¬ 
spondono all’introduzione dell’e¬ 
spressione da tastiera; è previsto che 
eventuali errori di battitura vengano 
corretti prima della digitazione del se¬ 
gno = , che segnala al programma la 
fine dell’espressione. L’espressione 
stessa viene introdotta nella memoria 
dell’elaboratore come un’unica strin¬ 
ga: le istruzioni 1730-2020, provvedo¬ 
no a spezzare tale stringa nei suoi ele¬ 
menti costitutivi (frazioni, segni di 
operazione, parentesi, esponenti), 
memorizzando ciascun elemento in 
una diversa componente del vettore 
X$. Un punto delicato riguarda la di¬ 
stinzione tra il segno meno come ope¬ 
ratore “binario”, e il segno meno co¬ 
me operatore “unario” (tipicamente 
quando esso è posto in testa all’espres¬ 
sione, davanti a una parentesi aperta) ; 
le istruzioni 1650-1720 si fanno carico 
di ciò, trasformando ogni meno “una¬ 
rio” in una sequenza del tipo - 1 *. A 
fianco del vettore X$, viene costruito 
un vettore “parallelo”, C%, ogni com¬ 
ponente del quale contiene, in forma 
codificata, un’informazione sulla na¬ 
tura della stringa che è memorizzata 
nella componente di uguale indice del 
vettore X$. Il codice mediante il quale 
è costruito il vettore C% è mostrato 
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dalla figura 2. Dobbiamo aggiungere 
che il programma in un primo tempo 
codifica tutte le operazioni mediante il 
numero 0, e solo in un secondo tempo 
(istruzioni 2320-2390) assegna a ogni 
operazione il suo “livello”, secondo 
quanto è stato spiegato in precedenza. 
Eventuali interi vengono trasformati 
in frazioni con denominatore uguale a 
1 (2030-2110); eventuali potenze con¬ 
tenute nei numeratori o nei denomina¬ 
tori vengono subito calcolate (2120- 
2210). Prima delPinizio del calcolo, si 
controlla che ogni frazione sia ridotta 
ai minimi termini (2220-2310). 

Una volta preparata l’espressione, 
cioè una volta costruiti i vettori di ser¬ 
vizio X$ e C% nel modo descritto, si 
stampa l’espressione stessa, e poi si 
procede al calcolo, partendo dalle 
operazioni di livello più elevato (istru¬ 
zioni 2420-2820). Quando entro una 
coppia di parentesi si trova un’unica 
frazione, le parentesi stesse vengono 
eliminate (2650-2770), non senza aver 
prima controllato se fuori parentesi vi 
è una potenza da eseguire (2710). L’e¬ 
liminazione di una coppia di parentesi 
comporta una compattazione dei vet¬ 
tori X$ e C%, e un conseguente ag¬ 
giornamento del numero NX delle 
componenti dei vettori stessi. Ogni 
volta che viene eseguita una compatta¬ 
zione, l’espressione viene stampata 
(istruzioni 2520, 2800). Quando NX 
vale 1, il calcolo è terminato, e si pro¬ 
cede alla stampa del risultato. 

Il programma controlla che, duran¬ 
te lo svolgimento dei calcoli, non si 
generino numeri troppo grandi. Si è 
scelto il numero 999999999 come mas¬ 
simo numero ammissibile (istr. 1520); 
si tratta del più grande numero che 
viene visualizzato sullo schermo senza 
essere convertito in “notazione scien¬ 
tifica”. Se tale limite viene superato, il 
programma viene interrotto, e viene 
stampato un messaggio di errore. 


Giulio Cesare Barozzi, autore di questo ■ 
articolo, è professore ordinario di ' 
Complementi di Matematica presso la ■ 
Facoltà di Ingegneria deH’Università di 
Bologna, dopo essere stato ordinario di 
Analisi Numerica presso la Facoltà di 
Scienze della stessa Università. Si è oc- i 
cupato di equazioni differenziali alle j 
derivate parziali e di algoritmi numeri- i 
ci. E’ autore di tre libri: Istituzioni di 
Matematica per naturalisti e biologi ; 
(CLUEB, 1971), Introduzione agli al¬ 
goritmi dell’Algebra Lineare (Zani- ! 
chelli, 1976), e Matematica per le , 
Scienze Economiche e Statistiche (Il 
Mulino, 1977), in collaborazione con 
C. Corradi. 
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Colore 

Sono possessore di un 
APPLE //e e ho acquistato il 
modulatore mod. Super 
Mod.II della M R Enterpri¬ 
ses, per poter avere le im¬ 
magini a colori sul mio tele¬ 
visore. Sono rimasto molto 
deluso dalla qualità del colo¬ 
re: i quindici colori GR sono 
preticamente tutte tonalità 
appena un po’ diverse tra lo¬ 
ro. 

Luigi Visentini 
Montebelluna 

Air interno delVAPPLEHe, 
sul lato destro e verso la mez¬ 
zaria del circuito stampato, 
c'è un piccolo interruttore 
con la scritta COLOR. Nor¬ 
malmente si trova in posizio¬ 
ne ON. Deve portarlo in po¬ 
sizione OFF e avrà i colori 
sul suo televisore. Il dischet¬ 
to DOS 3.3 Sample Pro- 
grams, avuto con il compu¬ 
ter, contiene un programma 
dimostrativo a colori: CO¬ 
LOR TEST. Con questo 
programma può regolare il 
suo televisore. 

Non gira bene 

Ho scritto un programma 
di booting per il mio dischet¬ 
to che chiede all’utente di 
battere una cifra corrispon¬ 
dente al programma che 
vuole eseguire. Questo pro¬ 
gramma legge la cifra con un 
GET A$ e provvede a far 
girare il programma richie¬ 
sto con istruzioni del tipo: IF 
A$ = “1” THEN PRINT 
CHR@(4); “RUN PRO¬ 
GRAMMA”. Questo pro¬ 
gramma non funziona a do¬ 
vere perché non riconosce il 
comando DOS ma Fistru- 
zione si comporta come un 
normalissimo PRINT. Pro¬ 
cedendo per esclusione ho 
stabilito che a influenzare il 
dos è l’istruzione GET. 

Claudio Santacesaria 
Milano. 

Esatto: Tistruzione GET 
non riconosce un comando 
DOS messo immediatamen¬ 
te dopo. Per ovviare all' in¬ 


conveniente, basta inserire, 
tra GET e il comando DOS 
un RETURN opiù semplice- 
mente PRINT. La Sua riga 
diventa IF A$=^^I" THEN 
PRINT: PRINT 
CHR$(4)r^RVN PRO¬ 
GRAMMA". (Applesoft 
Reference Manual-vol. I, 
pag.105}. 


ERRATA CORRIGE 

Purtroppo, per un errore 
tipografico, il listato relativo 
al programma pubblicato 
sul n.9 di Applicando a 
pag.67, contiene due errori. 
Ci scusiamo con i lettori e 
riportiamo le correzioni qui 
di seguito. 

Aggiungere la seguente 
riga 25 FOR I = 780 TO 
790:POKE 1,0:NEXT liPO 
KE 2063,208 Riga 642 
CTRL-M va corretto in 
CTRL-Q Riga 1710 IF E 
= 8 THEN PRM 'LO 
SPORTELLO DEL DRIVE E' 
APERTO!*SPRINT 'CHIUDI 
LO! BATTI UN TASTO PER 
CONTINUARE.*isGOSUB 
530:GET A$!PRINT:G0T0 
850 


Gran catalogo a 80 
colonne 

Possiedo un APPLE//e 
con scheda 80 col.64K. Un 
giorno ho fatto girare, per 
caso, il programma Gran 
Catalogo da voi pubblicato 
sul n.3, con la scheda 80 co¬ 
lonne attivata. Mi sono ac¬ 
corto che le colonne dei files 
da due erano diventate 
quattro, ma il programma 
non era più in grado di leg¬ 
gere il file corrispondente 
alla lettera premuta. Questo 
avviene poiché, con la sche¬ 
da in funzione, 40 colonne 
sono nella main memory al 
solito indirizzo di pag. 1 e le 
altre 40 colonne sono nella 
memoria della scheda agli 
stessi indirizzi e cioè 1024- 
2047, con le colonne pari 















Le soluzioni 
non sono 
tutte uguali. 


lettere 



P er il vostro pro¬ 
blemagestionale 
da noi troverete la 
soluzione APPLE 
e uomini pronti a 
collaborare con 
voi giorno 
dopo giorno. 



Corso Duca degli Abruzzi, 14 - 10128 Torino 
Tel. 011/535443 (3 linee) 


tapplG computar 


sulla scheda e le colonne di¬ 
spari nella main memory. Il 
programma Gran Catalogo 
legge solo i caratteri conte¬ 
nuti nelle colonne dispari. 
Per leggere le colonne pari 


dobbiamo attivare un soft- 
switch con un poke 49237,0 
(per disattivarlo occorre 
battere poke 49236,0). Vi 
invio quindi il listato con le 
linee da aggiungere e quelle 


Modifiche a gran cataiogo 


10 IF PEEK (49183) < 128 THEN PRIlfT CHW (4);‘PR«3 
REM ACCENDE SCHEDA 
400 POKE 36,H2;BA = FN A(X) 

405 mV, = H2 ./ 2; IF HIX * 2 = H2 THEN POKE 49237,0: GOTO 
410; REM COLOfn!t PARI 
407 POKE 49236,0: REM COLOTf^ DISPARI 
410 C = PEEK (BA + PEEK (36)); IF C = 160 THEN POP 
; GOTO 1060 
420 RETURN 

500 RIG= PEEK (37) M;C0L = PEEK (36) 

505 POKE 49237,0 

510 VTAB RIG: POKE 36,COL; 60SUB 600 
520 M$ = X$; POKE 49236,0 
530 MTAB RIG; POKE 36,COL; GOSUB 600 
535 M$ = RIGHT$ (M$, LEN (M$) - 1) 

540 CIX = COL / 2; IF CIX * 2 < ) COL THEN 560 
550 FOR X = 1 TO LEN (X$);T$ = T$ + MID$-<X$,X,1) + 

MIDI (M$,X,1): NEXT ; RETURN 
560 FOR X = 1 TO LEN (M$);T$ = T$ + MID$ (MS,X,1) + 

MID$ (X$,X,1): NEXT ; RETURN 
600 LOC = FN A(X) 

610 X$ = •’; FOR X = PEEK (36) TO LE 

620 C = PEEK (LOC + X);X$ = X$ + CHR$ (C); NEXT ; RETURN 

1040 FOR V = 3 TO PEEK (37) + 1; '/TAB V;H2 = 1; GOSUB 

400; HTAB 4: PRINT IWERSE ; PRINT CHR$ (V 
i 62);: NORMAL ; PRINT "--;;H2 =11; GOSUB 400: HTAB 
24; PRINT CHR$ (V + 30);"-"; 

1043 H2 = 21; GOSUB 400; POKE 36,43; PRINT CHR$ ( 

M + 62);"-";;H2 = 31; GOSUB 400: POKE 36,63; PRINT 
CHR^ 4 94);"-’;; NEXT 0 

1060 IF H2 = 1 OR H2 = 11 OR H2 = 21 OR H2 = 31 THEN 
PRINT 

1090 IF P < 32 THET^ IF P + 2 ) M THEN 2000 

1091 IF P ) 31 AND P < 65 THEN IF P - 30 ) V THEN 20 

00 

1092 IF P > 64 ^D P < 97 THEN IF P - 62 > V THEN 20 
00 

1093 IF P > 96 THEN IF P - 94 ) V THEN 2000 

1094 IF P = 32 THEN MTAB 23: END 

1099 IF P < 32 THEN mB P + 2; POKE 36,0;LE = -9; GOSUB 

500;LE = 7 

1100 IF P < 65 ^WD P > 32 THEN VTAB P - 30; POKE 36, 
10:LE = 19; GOSUB 5Q0;LE = 27 

1120 IF P > 64 ^¥^D P < 97 THEl^ '/TAB P - 62; POKE 36, 
20;LE = 29: GOSUB 500;LE = 47 
1130 IF P ) 96 THEN VTAB P - 94; POKE 36,30;LE = 39; 

GOSUB 500;LE = 67 

1140 If^ERSE : POKE 36,LE;FT$ = LER$ (T$,1):T$= MID^ 
(T$,7,13); SPEED= 100; PRINT T$; SPEEl)= 255: NORMAL 

1230 PRM CHR^ (21); HOME ; VTAB 12; PRINT C$;" ";T$ 
















Mercatino delle mele 


W Acquisto Apple //e, 
eventualmente con drive e 
monitor. Scrivere indican¬ 
do prezzo orientativo e nu- 
mero telefonico (solo 
Lombardia). Giovanni 
Tandi, Via Donizetti 8, 
24045 Fara d’Adda (BG). 


da modificare che, inserite 
nel vostro programma, per¬ 
mettono di avere il catalog 
su quattro colonne. La linea 
1230 è stata aggiunta per di¬ 
sattivare la scheda 80 col. I 
caratteri in INVERSE sono 
ottenuti tenedo premuto il 
tasto CTRL. 

Garuti Tiziano 
Spino D’Adda. 


Grazie del suggerimento e, 
certi di fare cosa gradita a 
tutti i possessori di AP- 
P LEI le con 80 coi, pubbli¬ 
chiamo le modifiche da lei 
suggerite. 


Apple 
e scacchi 


Vorrei sapere se esiste un 
programma per l'Apple //e 


zioni telefonare ore pasti 
allo 0586/422276 chieden¬ 
do di Antonello. 


w Vendo Expa Fast del¬ 
la Iret (doppio drive 8”, 
doppia faccia, capacità 
complessiva 1 megabyte) 
corredato di interfaccia 
per Apple II, cavo di ali¬ 
mentazione e collegamen¬ 
to interfaccia; più 30 dischi 
doppia faccia doppia den¬ 
sità già formattati. Scrive¬ 
re o telefonare a Achille 
Donali, via Urbinati 15, 
61100 Pesaro . Tel. 
0721/23926. 

® Vendo Apple II plus 64 
Kb, due drive, scheda con¬ 
troller, monitor 12, stam¬ 
pante Honeywell 132 co¬ 
lonne, paddles, modulato¬ 
re video per TV e vastissi¬ 
ma scelta di software: tut¬ 
to con manuali e imballi a 
L. 3.100.000. Per informa¬ 


* Per Apple //e vendo 
Koala Pad con due setti¬ 
mane di vita a L. 300.000. 
Per informazioni rivolger¬ 
si a Luigi Tolomelli, Via 
Martini 15, 51016 Monte- 
catini. Tel. 0572/73175. 


V Causa cambio siste¬ 
ma vendo per Apple II 
dieci dischetti doppia fac¬ 
cia con oltre 50 programmi 
di giochi e utilità (Flight 
Sim, Aztec, Visidex, Pfs, 
ecc.) a L. 100.000. Bruno 
Rota, Via Passo di Brizio 
6, 20148 Milano. 


w Vendo per Apple II 
Supertoto LO, superpro- 
gramma totocalcio inedi¬ 
to, tre diverse opzioni di 
selezioni incrociate, con 
output numero colonne 
utili, sviluppo su monitor o 
stampante. L. 60.000 con 
manuale. Roberto Rossi, 
Via Lario 26, 20159 Mila¬ 
no. 02/6070236 (sera). 


che insegni il gioco degli 
scacchi e che consenta di 
giocare contro il computer. 

Claudio Leale 
Serravalle Scrivia 


Il gioco degli scacchi è sta¬ 
to tra i primi a essere compu¬ 
terizzato. 

Uno dei programmi più 
conosciuti è Sargon ///, della 
Hayden Software, con 8 li¬ 
velli di gioco, una subroutine 
che suggerisce una buona 
mossa, anche se non neces¬ 
sariamente la migliore, la 
possibilità di mosse tipiche 
come rarrocco, la cattura en 
passant e la creazione di una 
particolare situazione di gio¬ 
co con accesso diretto alle 
posizioni. Si può trovare 
presso i migliori computer 
shop al prezzo di 70 mila lire 


dpplG computer 


1 


computer shop 
centro dimostrativo 
Apple //c^ //e, Macintosh e Lisa 
accessori e penrerlcne 
materiali di consumo 
software per tutte le esigenze 
assistenza tecnica 
corsi regolari a tutti 1 livelli 
considenza 

vendita, affitto, leasing 


Cnfals 

Infoniiailca 


Computer Shop 


viale Brigate Partlglane 132 r. 
Genova 


Programmazione. 
Assistenza e Corsi 


Via G. D’Annunzio 2/a6 
Genova 


TbL (010) 589327-592627 


circa. 


:appkz computer 
















Tutti i programmi di Applicando possono esse¬ 
re trascritti e quindi salvati su dischetto. Ma la 
trascrizione è lenta e noiosa, e sbagliare fin 
troppo facile. Ecco perché Applicando offre, 
già pronti, i dischetti con i programmi sotto¬ 
indicati: per ottenerli, è sufficiente inviarci il 
tagliando debitamente compilato. 


I Applicando 1 

® *AP1/I02 

£ Profitti.Calendario perpetuo.I tronchi del teso- 

É Si ro. Lire 30.000 (abbonati 25.000). 

*AP1/N03 

^ Eliminatore di Dos.Orologio.Pronti puntare 
^ fuoco! Lire'30.000 (abbonati 25.000). 

I ? Applicando 2 
i *AP2/IN04 

i Costi chilometrici auto. Richiamafigure. Laser 
J nello spazio. Lire 30.000 (abbonati 25.000). 

J Applicando 3 
i *AP3/IN05 

g Sistema base. Etichette. Contratti. Gran Cata- 
H logo. Lire 30.000 (abbonati 25.000). 
i AP3/A06 

Equo canone (occorre VisiCalc). Lire 25.000 
H (abbonati 20.000). 

^3 Applicando 4 
P *AP4/N07 

S Lettura sprint (versione italiana e versione con 
^ frasi in inglese). Rompiquindici. Tastierino fan- 
P tasma. Routine di Input. Lire 30.000 (abbonati 
§ 25.000). 

AP4/A08 

Banca dati Apple (occorre VisiDex). Lire 
g 30.000 (abbonati 25.000). 

Applicando 5 
P AP5/N08 

Investor. Lire 70.000 (abbonati 60.000). 


applicando 





*AP5/N09 

Agenda personale. Duello d’artiglieria. Mele e 
freccette. Lire 30.000 (abbonati 25.000). 

Applicando 6 
*AP6/N10 

Obbligazioni/Bond Manager. PucMan/Nibbler. 
Line Finde. Lire 30.000 (abbonati 25.000). 
AP6/N11 

Stress. Lire 55.000 (abbonati 45.000). 

Applicando 7 

*AP7/N12 

Apple pittore. Ottovolante. Diskblock. Archivio 
per Apple. Discoteca. Aiuto. Lire 30.000 (abbo¬ 
nati 25.000). 

Applicando 8 
‘AP8/N13 

Cambiacomandi/Messaggi. Le Mans. Appleor- 
gano. Lire 30.000 (abbonati 25.000). 
*AP8/T14 

Momento di una forza/Colpo all’asta. Hard co¬ 
py pagine in alta risoluzione. Lire 30.000 (ab¬ 
bonati 25.000). 

Applicando 9 
*AP9/N15 

Fuoco fatuo. Apple artista. Data Hello. Lire 
25.000 (abbonati 20.000). 

*AP9AT16 

Sistema di forze parallele. Traslazione e rota¬ 
zione di una figura piana. Lire 30.000 (abbonati 
25.000). 

Applicando 10 
‘AP10/N14 

Ripristino. Disk Map. Autonumber. Lire 30.000 
(abbonati 25.000). 

‘AP10/T17 

Rette nel piano cartesiano. Statistica. Lire 
30.000 (abbonati 25.000). 

Applicando 11 
‘AP11/N18 

Apple edicola. Disk Zap. Messaggi personali. 
Supertastierino numerico. Comparatore di pro¬ 
grammi in Basic. Trappola per pochi. Lire 
30.000 (abbonati 25.000). 

‘AP11/T19 

Equazioni. Lire 25.000 (abbonati 20.000). 

* I dischetti contrassegnati con asterisco con¬ 
tengono anche il programma tombola, omag¬ 
gio natalizio di Applicando e di Compushop, via 
Nomentana 265-273, Roma. 


Hai bisogno 
di un praticissrno 
data base? 
Deve essere 


[economico 


fiil riiTiiitffig 


Ordina 



AP3/IN05 


Un testseller di Applicarido 



Per seguire le azioni in 
&orsa con i grafici, la 
nedia nobile a 15 e 52 
mattinane. Medie di uolune 
e di prezzo, arialisi 
di portafoglio 
e rendiconti cornpleti. 
AP5/N08 



ti 



Compilare e spedire il tagliando qui sotto a Applicando, Editronica Srl., Corso Monforte 39, 20122 Milano 


Vogliate inviarmi i seguenti dischetti: 


n.. 
n. 
n. 
n.. 
n. 



lAlPl 1 

|/| 

1 1 1 1 


lAlPl 1 

LU 

1 1 1 1 


lAlPl ! 

l/l 1 1 1 


lAlPl 1 

i/| 

1 1 1 1 


|A|P| 1 

1/ 

1 1 1 1 


|A|P| 1 

1/ 

1 1 1 1 


lAlPM 


1 1 1 1 


Cognome . Nome . 

Via . Gap . 

Città . Prov . 

Scelgo la seguente formula di pagamento: 

□ allego assegno di L . non trasferibile intestato a Editronica srl. 

□ allego ricevuta versamento di L. ..:. sul cc/p n. 19740208 intestato a 

Editronica srl. - Corso Monforte, 39 - 20122 Milano 

□ pago fin d’ora l'importo di L . con la mia carta 

di credito Bank Americard N . 

scadenza . autorizzando la Banca 

d’America e d’Italia ad addebitarne l’importo sul mio conto BankAmericard. 


Sono abbonato: sì □ no □ 


Data . 


Firma 















































OBIETTIVO 
HIGH PBEOISION 



MEE - Memorie per Elaboratori Elettronici S.p.A. 

Forniture per Centri Elaborazione Dati 
Sede Amm.va; 20144 Miiano - Via Boni 29 
Tel. 4988541 (4 linee r.a.) - Telex 324426 MEE-I 
Filiali e Agenzie: Milano - Berganno - Torino 
Bielia - Padova - Parma - Boiogna - Firenze - Ancona 
Roma - Napoii ■ Catania - Oristano - Bari - Genova 
Bolzano - Mestre 


HIGH PRECISION A COLPO SICURO! 


High precision Data Memories 
é tecnologia avanzata di costruzione. 

È il supporto magnetico testato ai limiti 
della resistenza con garanzia di assoluta 
affidabilità. 

È avanguardia tecnologica per assicurare 
la massima protezione dei dati, 
anche, nelle situazioni più critiche. 



















BP5420 


stampante professionale 
ad alta velocità 



Con l’avvento 
della Business 
Printer 5420, 

Seikosha entra di 
prepotenza nella fascia 
medio-alta di utenza di stampanti 
seriali a matrice di punti. Le prestazioni di 
periferica altamente professionale, rappresentano 
il compendio ideale fra una velocissima stampante 
seriale a matrice e una stampante a margherita. La 
BP5420 è infatti una stampante duale: l’originale 
meccanismo di stampa concepito da Seikosha 
consente prestazioni elevatissime in Data Proces¬ 
sing Mode (420 CPS) e altrettanto inusitate nella 


produzione di 
Correspondence 
Character Quality 
(104 CPS). Massima 
affidabilità e sicurez¬ 
za sono garantite 
dall’utilizzo di una tec¬ 
nologia di stampa uni¬ 
ca che minimizza l’usura 
tipica riscontrabile negli 
aghi e negli elettromagneti necessari per lanciarli, 
grazie ad un dimensionamento meccanico ottima¬ 
le che migliora nettamente robustezza e durata 
della testa. 


DIVISION OF G.B.C 


SEIKOSHA 


Caratteristiche: 

• Stampante ad impatto a matrice di punti da 
136 colonne 

• Matrice di stampa 9x8 (densità 10 cpi) e 17x16 
(densità 10 cpi in esecuzione carattere 
corrispondenza o italico) 

• Percorso di stampa bidirezionale con 
ottimizzazione del percorso (anche in stampa 
grafica) 

• Capacità grafiche: bit image standard n 
(orizzontale) x 8 (verticale) (n=816) e bit image 
alta risoluzione n (orizzontale) x 16 (verticale) 
(n=1632) 

• Possibilità ripetizione automatica di un 
carattere grafico 

• Velocità 420 caratteri/secondo (104 caratteri/ 
secondo con matrice 17x16 in esecuzione 
carattere corrispondence 

• Caratterizzazione: 10,12 e 16 cpi e relativi 
espansi: 10 e 12 cpi in corrispondenza quality e 
relativi espansi; 10 cpi italico e relativo 


espanso; super e sub scritture in densità 
20 cpi e relativi espansi; set di carattere 
proporzionale: sottolineato 

• Interfacce: parallela Centronics e seriale 
RS232C 

• Alimentazione carta: trattori (larghezza modulo 
continuo variabile da 5 a 15,5”) e frizione 
(larghezza foglio singolo fino a 11”) 

• Stampa 1 originale e 4 copie 

• Set di 95 caratteri ASCII e 64 caratteri e 
simboli europei 

• 4 Generatori di caratteri nazionali selezionabili 
via dip switch 

• Consumo 55W (standby) o 175W (stampa) 

• Livello di rumore: inferiore a 60 dB 

• Durata di vita testa: 500 milioni di caratteri 

• MTBF: 800 ore (esclusa vita testa) 

• MTTR: 30 minuti 

• Peso: 23 KG, 

• Dimensioni: 405 (prof.) x 595 (largh.) 

X 185 (alt.) mm; prof. 580 con separatore carta 

• Nastro: colore nero su cartuccia dedicata 







